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Vorwort 


Im Bereich der Personal-Computer ist der 6502 immer noch der am 
weitesten verbreitete Prozessor. Dies wird sich auch in der nächsten Zeit 
nicht ändern, denn Computer, die jetzt neu auf den Markt kommen, 
verwenden ihn ebenfalls. 

Jeder ernsthafte Benutzer eines Computers wird sich nicht nur mit 
der Kenntniss einer höheren Programmiersprache begnügen, sondern 
wird versuchen, auch die Maschinensprache zu verstehen und zu 
beherrschen. Dies ist vor allen dann notwendig, wenn an den Rechner 
Peripheriegeräte wie Drucker, Wandler, Steuerungen angeschlossen 
werden, und somit eine schnelle Datenübertragung zwischen Um¬ 
welt und Rechner stattfinden soll. 

Dazu soll ihm das vorliegende Buch, Programmieren in Maschinen¬ 
sprache 6502, verhelfen. Es ist die völlige Neubearbeitung der bereits 
früher erschienenen Ausgabe gleichen Titels. 

In dieser Ausgabe sind sehr viele Beispiele hineingenommen worden, 
denn damit lässt sich eine Computersprache leichter erlernen. Ferner 
werden die wichtigsten 6502 Systeme mit ihren Eigenheiten bei der 
Assembler-Programmierung vorgestellt. 

Dadurch ist erstens ein Vergleich der Systeme möglich, und zweitens 
können die Programmbeispiele an jedem dieser Rechner ausgeführt 
werden. Das Lernen ist somit kein trockener Vorgang, sondern eine 
reizvolle Beschäftigung mit den Computern. 

Dazu wünschen wir den Lesern viel Spaß und Erfolg ! 


Holzkirchen, 
Herbst 1981 


Die Verfasser 
E. Flögel W. Hofacker 
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Einführung 


1. Einführung 

Das Rechnen mit Zahlen war immer ein unbeliebter Vorgang. Deshalb 
wurde auch schon im Altertum versucht, dieses Rechnen maschinell 
durchzuführen. Dazu ist es aber notwendig, eine Zahl physikalisch 
darzustellen. Eine dieser Möglichkeiten bestand darin, eine Zahl einer 
Folge von Zähnen eines Zahnrades zuzuordnen. Nach diesem Prinzip 
entstanden sehr leistungsfähige Maschinen für die 4 Grundrechnungs¬ 
arten. 

Beim Übergang von den mechanischen zu den elektronischen Rechen¬ 
maschinen mußte nun für die Zahlen eine Darstellung durch Spannungs¬ 
pegel gesucht werden. Die einfachste und sicherste Methode war hier, 
die Zahl als eine Folge von hohen und niederen Spannungspegeln dar¬ 
zustellen. So entstand als kleinste Einheit einer Zahl das Bit. Damit 
lassen sich zwei Zustände, d. h. zwei Zahlen Null und Eins darstellen. 


1.1 Zahlendarstellung 

Während wir im dezimalen Zahlensystem für eine Stelle die Zahlen 0 
bis 9 zur Verfügung haben, haben wir im binären Zahlensystem nur die 
Zahlen 0 und 1. Mit 2 Stellen, d. h. mit 2 Bit können schon 4 Zahlen 
(Abbildung 1.1), mit 3 Stellen 8 Zahlen dargestellt werden. 
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Abbildung 1.1 
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Der Zahlenumfang beträgt also mit N Bit 2^ Zahlen, er erfasst somit 
die Zahlen von 0 bis 2^ — 1. 


Bei der physikalischen Realisierung entsprechen den Bit im binären 
Zahlensystem elektrische Leitungen im Mikroprozessor. Bei den ersten 
Mikroprozessoren (INTEL 4004) betrug die Stellenanzahl 4. Binäre 
Zahlen mit 4 Stellen konnten somit verarbeitet werden. Die nächste 
Entwicklungsstufe brachte dann die heute am weitesten verbreiteten 
Mikroprozessoren mit 8 Bit. Zu diesen gehört auch die 6502 CPU 
(Central Prozessing Unit), mit deren Programmierung wir uns hier 
beschäftigen wollen. 

Neuere Entwicklungen sind jetzt 16 und 32 Bit Prozessoren. 

Eine Binärzahl mit 8 Stellen bezeichnet man auch als Byte. Mit einem 
Byte können die Zahlen von 0 bis 255 dargestellt werden (Abbildung 
1.2). 
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Abbildung 1.2 
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Der Zahl 198 entspricht die folgende Binärzahl: 

198 = 1 1 0 0 0 1 1 0 

Die einzelnen Bit eines Bytes haben die folgende Wertigkeit: 



Vielfach werden die Stellen eines Byte auch durch den Exponenten der 
Zweierpotenz gekennzeichnet. Bit 0 ist das am weitesten rechts 


























stehende, Bit 7 ist das am weitesten links stehende Bit. Dabei ist Bit 0 
das Bit mit der geringsten Wertigkeit, und daher auch oft mit LSB 
(Least Significant Bit) bezeichnet. Demgegenüber wird Bit 7, mit der 
höchsten Wertigkeit, mit MSB (Most Significant Bit) bezeichnet. 


2 n 

n 

1 

0 

2 

1 

4 

2 

8 

3 

16 

4 

32 

5 

64 

6 

128 

7 

256 

8 

512 

9 

1024 

10 

2048 

11 

4096 

12 

8192 

13 

16384 

14 

32768 

15 

65536 

16 


1.3 Zweierpotenzen von 0 bis 16 


Für dieses Bitmuster muß nun noch eine einfache Darstellung gesucht 
werden, mit der man dies auch sprachlich angeben kann. 

Dazu teilt man die 8-bit in zwei 4-bit Worte auf. Die 16 möglichen 
Zahlen werden nun in der folgenden Weise bezeichnet (Abbildung 1.4). 


Für die Zahlen 0 bis 9 werden die dezimalen Bezeichnungen, für die 
Zahlen 10 bis 15 die Buchstaben A bis F verwendet. 

Für diese Darstellung hat sich im angelsächsischen Sprachgebiet die 
Bezeichnung Hexadecimalsystem oder kurz HEX-System eingeführt. 


Die richtige Bezeichnung ist aber Sedezimalsystem. Wenn wir hier 
jedoch bei der Bezeichnung Hexadezimal bleiben so liegt dies daran, 
daß diese Bezeichnung allgemein üblich ist. 

0 0 0 0 0 

0 0 0 1 1 

0 0 10 2 

0 0 11 3 

0 10 0 4 

0 10 1 5 

0 110 6 

0 111 7 

1 0 0 0 8 

10 0 1 9 

10 10 A 

10 11 B 

110 0 C 

110 1 D 

1110 E 

1111 F 

1.4 Sedezimalsystem (Hexadezimalsystem) 


Die Zahl 198 mit dem Bitmuster 1 1 0 0 0 1 1 0 entspricht dem¬ 
nach im Hexadezimalsystem die Bezeichnung C6. 

198= 1 1 0 0 0 1 1 0 = C6 

Im folgenden werden nun Zahlen in allen 3 Zahlensystemen auftreten. 
Um nun Verwechslungen zu vermeiden, werden folgende Verein¬ 
barungen getroffen: 

Eine Hexadezimalzahl wird durch ein vorgestelltes Dollarzeichen ge¬ 
kennzeichnet, z. B. SC6 , S1000 usw. 

Eine binäre Zeichenfolge wird durch ein vorgestelltes Prozentzeichen 
gekennzeichnet, z. B. % 0 0 1 0 1 1 0 0. 
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Eine Zahl ohne weitere Angabe ist eine Dezimalzahl. 

198 = % 1 1 0 0 0 1 1 0 = SC6 

Ein Bitmuster von 8 bit kann auf verschiedene Weise interpretiert 
werden. Wir haben bis jetzt gesehen, daß damit 256 Zahlen dargestellt 
werden können. Dieses Bitmuster kann aber auch ein Zeichen oderein 
Befehl für den Prozessor sein. Der eigentliche Anfang der programmier¬ 
baren Rechenautomaten begann mit der Idee, Zahlen und Befehle 
durch Bitmuster darzustellen und sie in einem gemeinsamen Speicher 
abzulegen. 


1.2 Vorzeichenbehaftete Zahlen 

Sollen durch das Bitmuster positive und negative Zahlen bezeichnet 
werden, so muß ein Bit als Vorzeichenbit interpretiert werden. Dazu 
wird Bit 7 benutzt. Mit Bit 7 = 0 ist die Zahl positiv, mit Bit 7 = 1 ist 
die Zahl negativ. 

Somit ist S00 = 0 

SOI = 1 


S7F =127 


Für negative Zahlen wird eine andere Darstellung verwendet, das soge¬ 
nannte 2-er Complement. Complementieren einer Binärzahl bedeutet 
vertauschen von Null und Eins. Bei der Bildung des 2-er Complements 
wird zu dieser Vertauschung noch eine Eins dazuaddiert. 

Beispiel: Bestimmung der Zahl —1. 


+1 

4 

% 

0 

0 

0 

0 

0 

0 

0 

1 

Complement 

A 

% 

1 

1 

1 

1 

1 

1 

1 

0 

Eins dazuaddiert 


+% 

0 

0 

0 

0 

0 

0 

0 

1 

ergibt --1 

A 

% 

1 

1 

1 

1 

1 

1 

1 

1 = SFF 


Die Zahl —1 wird also durch % 1 1 1 1 1 1 1 1 oder SFF gekennzeich¬ 
net. 
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Die Abbildung 1.5 zeigt die Zahlengerade mit positiven und negativen 
Binärzahlen. 


S80 S81 SFE SFF S00 SOI S02 S7E S7F 

-!- 1 - . . . - 1 - 1 - 1 - 1 ---- . - 1 - 1 _ 

-128 -127 -2 -1 0 1 2 126 127 

1.5 Zahlengerade 


1.3 Rechenregeln und logische Verknüpfungen 

Im Beispiel für die Bildung einer negativen Zahl wurde die Addition 
zweier Binärzahlen ausgeführt. Hierfür gelten folgende Rechenregeln: 

0 0 11 
+0 +1 +0 +1 

01 1 JJ0 

Beispiel: 132 + 20 = 152 

132 = % 1 0 0 0 0 1 0 0 

+ 20 = % 0 0 0 1 0 1 0 0 

152 = % 1 0 0 1 1 0 0 0 

Eine Subtraktion wird durch Addition der negativen Zahl durchgeführt. 

Beispiel: 98 — 20 = 78 

20 = % 0 0 0 1 0 1 0 0 

Complement - % 1 1 1 0 1 0 1 1 

+ 1 % 0 0 0 0 0 0 0 1 

-20 = % 1 1 1 0 1 1 0 0 

98 = % 0 1 1 0 0 0 1 0 

+ (- 20 ) = % 1 1 1 0 1 1 0 0 

+ 78 = %JJ0 1 0 0 1 1 1 0 
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Der entstehende Übertrag weist darauf hin, daß die Subtrakiton ohne 
"Borgen" ausgeführt wurde und der Rest eine positive ganze Zahl ist. 


Beispiel: 20 — 98 = —78 


98 

Complement 

+ 1 


= % 0 1 1 0 0 0 1 0 

= % 1 0 0 1 1 1 0 1 

Ä % 00000001 


-98 = % 1 0 0 1 1 1 1 0 


20 = % 0 0 0 1 0 1 0 0 

+ (- 98) = % 1 0 0 1 1 1 1 0 

— *78 = % 1 0 1 1 0 0 1 0 


Der Betrag der negativen Zahl — 78 wird durch Rückwandlung in eine 
positive Zahl gebildet 


-78 = % 1 0 1 1 0 0 1 0 

+ (- 1 ) = % 1 1 1 1 1 1 1 1 

% JJ 1 0 1 1 0 0 0 1 

Complement 1781 - %01001110 


1.4 Logische Funktionen 

Folgende logische Funktionen können auf binäre Zahlen angewendet 
werden: 


1. Negation 

Die negierte Zahl wird durch Überstreichen gekennzeichnet. 

B = 0 ; B = 1 und 
B = 1 ;B = 0 
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2. Die UND-Funktion 

A & B = C 


A 

B 

C 

0 

0 

0 

0 

1 

0 

1 

0 

0 

1 

1 

1 


Diese Funktion wird zum Ausblenden bestimmter Teile eines Bit¬ 
musters benötigt. 

B = % 1 0 1 1 0 1 0 1 

A = % 0 1 1 1 1 0 0 0 

B&A = % 00110000 


Das Bitmuster B wird nur an diesen Stellen ins Ergebnis übernommen, 
in denen im Ausblendmuster A eine 1 steht. 


3. Die ODER-Funktion 


A V B = C 


A 

B 

C 

0 

0 

0 

0 

1 

1 

1 

0 

1 

1 

1 

1 


Mit der ODER-Funktion können bestimmte Bit im Ergebnis zwangs¬ 
weise zu 1 gemacht werden. 

B = % 0 1 0 1 1 0 0 1 

A = % 1 0 0 0 0 0 1 1 

B V A ~ % 1 1 0 1 1 0 1 1 
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4. Die EXCLUSIV ODER-Funktion 


A A B = C 


A 

B 

C 

0 

0 

0 

1 

0 

1 

0 

1 

1 

1 

1 

0 


Mit der EXCLUSIV ODER-Funktion kann das Complement eines Bit¬ 
musters gebildet werden. 


B 

% 

1 

0 

1 

1 

0 

1 

0 

1 

A 

% 

1 

1 

1 

1 

1 

1 

1 

1 

B A A = 

% 

0 

1 

0 

0 

1 

0 

1 

0 


4 

3 

2 

1 

HEX 

DEZ 

HEX 

DEZ 

HEX 

DEZ 

HEX 

DEZ 

0 

0 

0 

0 

0 

0 

0 

0 

1 

4,096 

1 

256 

1 

16 

1 

1 

2 

8,192 

2 

512 

2 

32 

2 

2 

3 

12,288 

3 

768 

3 

48 

3 

3 

4 

16,384 

4 

1,024 

4 

64 

4 

4 

5 

20,480 

5 

1,280 

5 

80 

5 

5 

6 

24,576 

6 

1,536 

6 

96 

6 

6 

7 

28,672 

7 

1,792 

7 

112 

7 

7 

8 

32,768 

8 

2,048 

8 

128 

8 

8 

9 

36,864 

9 

2,304 

9 

144 

9 

9 

A 

40,960 

A 

2,560 

A 

160 

A 

10 

B 

45,056 

B 

2,816 

B 

176 

B 

11 

C 

49,152 

C 

3,072 

C 

192 

C 

12 

D 

53,248 

D 

3,328 

D 

208 

D 

13 

E 

57,344 

E 

3,584 

E 

224 

E 

14 

F 

61,440 

F 

3,840 

F 

240 

F 

15 


1.6 Tabelle zur Umwandlung von Hexadezimalzahlen in 
Dezimalzahlen 
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In Abbildung 1.6 ist eine Tabelle zur Umwandlung von Hexadezimal¬ 
zahlen in Dezimalzahlen angegeben. Für die 4-stellige Hexzahl SABCD 
erhält man als Dezimalzahl 


SABCD = 40960 + 2816+ 192 + 13 = 43981 

Die Umwandlung einer Dezimalzahl in eine Hexadezimalzahl wird durch 
Subtraktion des nächst kleineren Dezimalwertes einer Hexadezimal¬ 
stelle erreicht. 

Beispiel: 

Umwandlung von 33333 in Hexadezimalzahl 

33333 33333 = S8235 

- 32768 = S8000 

565 

- 512 = S 200 
53 

- 48 = S 30 
5 

- 5 =S 5 
0 
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Aufbau der 
CPU 6502 


2. Aufbau der CPU 6502 

In der Abbildung 2.1 ist die CPU 6502 in einer Form dargestellt, die 
alle dem Programmierer zugänglichen Teile zeigt. Mit diesen internen 
Registern wird der Datenfluß zwischen den Teilen eines Mikropro¬ 
zessorsystems geregelt. 


7 0 


15 

Akkumulator 

X—Register 

Y—Register 

Programmzähler MSB 

Programmzähler LSB 

1 

Stapelzeiger 


Prozessor—Statusregister 


2.1 Logische Struktur der CPU 6502 


Das zentrale Register ist der Akkumulator. Bei der Ausführung einer 
arithmetischen Operation ist ein Operand im Akkumulator, der andere 
im Speicher. Das Ergebnis wird im Akkumulator abgelegt und kann von 
dort in den Speicher zurückgeschrieben werden. Der Operand, der sich 
vorher im Akkumulator befand wird also überschrieben und geht somit 
verloren. 


Sollen Daten im Speicher verschoben werden, so müssen sie erst durch 
einen LADE-Befehl in den Akkumulator übernommen und dann durch 
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einen SPEICHER-Befehl zurückgeschrieben werden. 

Die beiden folgenden Register, mit X-, bzw Y-Register bezeichnet, 
können ebenfalls Daten aus dem Speicher übernehmen und wieder zu¬ 
rückschreiben. Die Ausführung von arithmetischen Befehlen ist aller¬ 
dings eingeschränkt. Der Inhalt dieser Register kann jeweils nur um Eins 
erhöht oder erniedrigt werden. Damit sind sie aber besonders als Zähl¬ 
register (Indexregister) zum Abzählen von Programmschleifen geeignet. 
Wie wir bei den Adressierungsarten noch sehen werden, kann mit dem 
Inhalt des X- oder Y-Registers eine programmierte Adresse verändert 
werden. Auf diese 3 Register, Akkumulator, X- und Y-Register kann 
der Programmierer sehr leicht zugreifen. 

Weit weniger zugänglich sind die folgenden Register. Der Programm¬ 
zähler belegt zwei 8-bit Register. Somit reicht also der Bereich der 
ansprechbaren Adressen von 80000 bis 8FFFF oder dezimal ausge¬ 
drückt von 0 bis 65535. Vor dem Start eines Programms muß er die 
Anfangsadresse, die Adresse des Befehls, der als erster ausgeführt wird, 
enthalten. Danach zeigt er immer auf den als nächsten auszuführenden 
Befehl. Eine Änderung dieses Ablaufs wird durch Sprung- oder Ver¬ 
zweigungsbefehle erreicht. 


Das folgende Register, als Stapelzeiger bezeichnet, enthält die Adresse 
des nächsten freien Platzes in einem besonderem Speicherbereich, dem 
Stapel. Dieser Stapel belegt bei den 6502 Systemen fest den Adress- 
bereich von 8100 bis 81 FF. Als Adresse sind im Stapelzeiger nur die 
beiden letzten Stellen (800 — 8FF) abgelegt, die 1 in der vordersten 
Stelle wird vom Prozessor automatisch hinzugeführt. Während eines 
Programmablaufs werden bei Unterprogrammaufrufen oder bei Inter¬ 
ruptanforderungen die augenblicklichen Adressen des Programm¬ 
zählers aufbewahrt. Bei einem Interrupt auch noch zusätzlich der Inhalt 
des folgenden Registers, dem Prozessorstatus-Register. In diesem wird 
in einzelnen Bits der augenblickliche Zustand des Prozessors gespeichert. 
Ihre Zuordnung ist in Abbildung 2.2 dargestellt. 

Die Bit 0, 1,6 und 7 werden durch Rechenoperationen beeinflußt. Bit 
0 (CARRY) ist 1, wenn bei der Ausführung des Befehls ein Übertrag 
aus Bit 7 des Akkumulators eintrat. Bit 1 (ZERO) ist 1, wenn das 
Ergebnis der Rechenoperation Null ist. Bit 6 (OVERFLOW) wird 1, 
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wenn ein Übertrag im Akkumulator von Bit 6 nach Bit 7 stattfindet, 
und schließlich wird Bit 7 gleich 1, wenn das Ergebnis eine negative 
Zahl darstellt. 


7 o 
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B 
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1 

Z C 
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-► 


CARRY 

= 1 

Übertragung aus Bit 7 

ZERO 

= 1 

Ergebnis Null 

IRQ 

= 1 

Interrupt über IRQ nicht möglich 

DECIMAL 

= 1 

dezimale Arithmetik 

BRK 

= 1 

BRK Befehl ausgeführt 

OVERFLOW 

= 1 

Übertragung aus Bit 6 

NEGATIV 

= 1 

Ergebnis negativ 


2.2 Belegung der Bit im Statusregister 


Bit 2 des Statusregisters (IRQ DISABLE) bestimmt, ob ein Interrupt 
durch IRQ (Interruptrequest) zugelassen wird oder nicht. Mit einer 1 
in diesem Bit wird der Prozessor durch einen Impuls auf IRQ nicht 
unterbrochen. 

Durch den BRK-Befehl (BREAK) kann ein Programmablauf durch 
Software unterbochen werden. Dabei wird dann Bit 4 auf 1 gesetzt. 


Bit 3 endlich bestimmt, ob die arithmetischen Operationen Addieren 
und Subtrahieren dezimal oder hexadezimal ausgeführt werden. 


In Abbildung 2.3 ist nun der interne Aufbau der CPU dargestellt. Hier 
finden wir auch unsere vom Programm zugänglichen Register (Index¬ 
register, Akkumulator, Statusregister, Programmzähler) wieder. Da¬ 
neben sind aber auch noch weitere Komponenten vorhanden. Das 
zentrale Rechenwerk ist die ALU (Arithmetik Logical Unit). 


Diese führt alle Rechenoperationen aus. 






















RES IR . NMI 



2.3 Interne Struktur der CPU 6502 
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Ein in die CPU eingelesenes Bitmuster wird gespeichert, und wenn es 
sich um einen Befehl handelt vom Befehlsdecoder entschlüsselt. Über 
einen internen Datenbus werden die Bitmuster dem jeweiligen Register 
zugeordnet. Handelt es sich um Adressen werden sie über interne 
Adressierungen auf die Adressausgänge der CPU durchgeschaltet. 


Die CPU selbst benötigt zum Betrieb nur einen externen Taktgenerator. 
Intern werden dann alle notwendigen Signale erzeugt. Abbildung 2.4 
zeigt die Pinbelegung eines 6502 im 40 poligen Gehäuse. 


VSS c 

RDY c 

01 (OUT) C 
iRQ C 

N.C. C 

NMl C 

SYNC C 

VCC C 

ABO C 

ABI [ 

AB2 C 

AB3 [ 

AB4 C 

AB5 C 

AB6 C 

AB7 [ 

AB8 [ 

AB9 [ 

ABIO C 

ABU r 


07 

Ul 

o 

IS) 

o 

“0 

C 


RES 

=3 02 (OUT) 
S.O. 

=300 (IN) 
N.C. 

N.C. 

ZJ R/W 
13 OBO 
DB1 
OB2 
OB3 
DB4 
DB5 
DB6 
ZI DB7 
AB15 
ZI A814 
AB13 
ABI 2 
VSS 


2.4 6502 Pinbelegung 
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Befehlsarten 


3. Befehlsarten 

Der Befehlsvorrat der 6502 CPU wird zum besseren Verständnis in 8 
Gruppen aufgeteilt. Diese Einteilung wird so getroffen, daß Befehle, die 
gleiche Funktionen haben, in einer Gruppe zusammengefasst sind. Wir 
beginnen mit den Transportbefehlen. Mit diesen Befehlen wird ein 
Bitmuster z. B. vom Akkumulator in den Speicher oder in ein Index¬ 
register transportiert. 

Eine kurze Bemerkung zur Bezeichnung der Befehle. Im Rechner selbst 
wird ein Befehl durch ein Bitmuster, bestehend aus 0 oder 1 dargestellt. 
Dieses Bitmuster kann auch durch eine Hexadezimalzahl angegeben 
werden. Wir verwenden aber hier eine abgekürzte Schreibweise, die 
wir auch später als Assemblerschreibweise kennenlernen werden. Nun 
zu den Befehlsgruppen. 

3.1 Transportbefehle 

LDA (Load Accu) Laden den Akkumulator mit dem Inhalt 


einer Speicherzelle. 


LDX 

LDY 


Lade das X-, bzw. das Y-Register mit dem 
Inhalt einer Speicherzelle. 


STA (Store Accu) 


Speichere den Inhalt des Akkumulators in 
eine Speicherzelle. 


STX 

STY 


Speichere den Inhalt des X-, bzw. Y- 
Registers in eine Speicherzelle. 


TAX 

TAY 


Transportiere den Inhalt des Akkumulators 
in das X-, bzw. Y-Register. 


TXA 

TYA 


Transprotiere den Inhalt des X-, bzw. Y- 
Registers in den Akkumulator. 


TSX 


Transportiere den Stapelzeiger in das 
X-Register. 


TXS 


Transportiere das X-Register in den Stapel¬ 
zeiger. 


PLA (Pull Accumulator Der Inhalt der Speicherzelle im Stapel- 
from Stack) Speicher, auf die der Stapelzeiger hinweist, 

wird in den Akkumulator, bzw. in das 
PLP (Pull Prozessor Prozessorstatus-Register übernommen. Der 
Status from Stack) Inhalt des Stapelzeigers wird um Eins 
erhöht. 


PHA (Push Accumulator Der Inhalt des Akkumulators bzw. des Pro- 
on Stack) zessorstatus-Registers wird in die Speicher¬ 

zelle des Stapels geschrieben, auf die der 
PHP (Push Prozessor Stapelzeiger hinweist. Anschließend wird 

Status on Stack) der Inhalt des Stapelzeigers um Eins 

erhöht. 


3.2 Arithmetische Befehle 

Die 6502 CPU besitzt nur Befehle zum Addieren und Subtrahieren, 
keine Multiplikations- oder Divisionsbefehle. 


ADC 

(Add with Carry) 

Addiere den Inhalt einer Speicherzelle zum 
Inhalt des Akkumulators. Erhöhe dieses 
Ergebnis um 1, wenn das Übertragsbit = 1 

SBC 

(Subract with 
Carry) 

ist. Subtrahiere den Inhalt einer Speicher¬ 
zelle vom Inhalt des Akkumulators. Er¬ 
niedrige dieses Ergebnis um 1, wenn das 
Übertragsbit 1 ist. 

INC 

INX 

INY 

(Increment) 

Erhöhe den Inhalt einer Speicherzelle 
des X-, bzw. Y-Registers um 1. 

DEC 

DEX 

DEY 

(Decrement) 

Erniedrige den Inhalt einer Speicher¬ 
zelle, des X-, bzw. Y-Registers um 1. 
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3.3 Logische Befehle 

Mit dieser Befehlsgruppe werden der Inhalt des Akkumulators und der 
Inhalt einer Speicherzelle durch logische Operationen verknüpft. Das 
Ergebniss ist im Akkumulator gespeichert. 


AND 

UND-Funktion 

ORA 

ODER-Funktion 

EOR 

Exclusiv ODER-Funktion 


3.4 Vergleichsbefehle 

Mit diesen Vergleichsbefehlen wird der Inhalt des Akkumulators oder 
der Indexregister mit dem Inhalt einer Speicherzelle verglichen. Das 
Ergebnis dieses Vergleichs setzt die entsprechenden Bit im Prozessor¬ 
status-Register. Der Inhalt des Akkumulators wird nicht verändert. 

CMP (Compare) Vergleiche den Inhalt einer Speicherzelle 

CPX mit dem Akkumulator, dem X-, bzw. 

CPY Y-Register. 


In Abbildung 3.1 wird dargestellt, in welcher Weise die Bit im Status¬ 
register gesetzt werden. Eine besondere Beachtung bedarf hier das N 
Bit des Statusregisters. Dieses Bit wird durch die Vergleiche so gesetzt, 
als ob die Zahlen im 2-er Complement dargestellt sind, d. h. daß der 
Zahlenbereich nicht von 0 bis 255, sondern von — 128 bis +127 reicht. 


Vergleich 

N 

Z 

c 

A, X, Y<M 

1* 

0 

0 

A, X, Y = M 

0 

1 

1 

A, X, Y > M 

0* 

0 

1 


‘Vergleich im 2-er Complement 


3.1 Setzen der Bit im Statusregister durch Vergleichsbefehle 


Werden folgende zwei Zahlen miteinander vergleichen, < A > = $00, 
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< M > = SFF so ist für das ZERO- und CARRY-Bit der Inhalt des Akku¬ 
mulators kleiner als der Inhalt der Speicherzelle (A < M) und somit 
sind ZERO- und CARRY-Bit Null (Z = 0, C = 0). Bei der Darstellung im 
2-er Complement bedeutet SFF aber —1, damit ist der Inhalt des Akku¬ 
mulators größer als der Inhalt der Speicherzelle. Für das N Bit gilt also 
A ) M. Es wird ebenfalls Null gesetzt (N = 0). 

Ein besonderer Vergleichsbefehl ist der BIT-Befehl. 

BIT (Bit Test) Der Inhalt einer Speicherzelle wird mit dem 

Inhalt des Akkumulators durch die UND- 
Funktion verknüpft, ohne daß dabei der 
Inhalt verloren geht. Das ZERO-Bit wird 
entsprechend dem Ergebnis gesetzt. 

Bit 6 des Ergebnisses wird in das Overflow 
(V) Bit, Bit 7 in das Negativ (N) Bit über¬ 
nommen. 


3.5 Verzweigungsbefehle und Sprungbefehle 

Durch einen Sprungbefehl wird ein Programm immer an einer anderen 
Stelle weitergeführt. Bei Verzweigungsbefehlen wird ein Programm nur 
dann an einer anderen Stelle weitergeführt, wenn die entsprechende Be¬ 
dingung im Statusregister erfüllt ist. Der Operand nach dem Operations¬ 
code wird als Zahl im 2-er Complement aufgefasst, sodaß Verzweig¬ 
ungen nur um — 128 bis + 127 Zellen ausgeführt werden können. 


BCC 

(Branch on Carry 
Clear) 

BCS 

(Branch on Carry 
Set) 

BEQ 

(Branch on 

EQual) 

BNE 

(Branch Not Equal) 

BMI 

(Branch on Minus) 

BPL 

(Branch on PLus) 


Verzweigung, wenn C = 0 

Verzweigung, wenn C = 1 

Verzweigung, wenn Z = 1 

Verzweigung, wenn Z = 0 
Verzweigung, wenn N = 1 
Verzweigung, wenn N = 0 
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BVC 

(Branch on OVer- 
flow Clear) 

Verzweigung, wenn V = 0 

BVS 

(Branch on OVer- 
flow Set) 

(Verzweigung, wenn V = 1 

JMP 

(Jump) 

Springe unbedingt. 

JSR 

(Jump Subroutine) 

Sprung in Unterprogramm. 

RTS 

(Return from 
Subroutine) 

Rücksprung aus Unterprogramm. 

RTI 

(Return from 
Interrupt) 

Rücksprung aus Interruptprogramm, 


3.6 Schiebebefehle 

Mit diesen Befehlen wird der Inhalt einer Speicherzelle oder der In¬ 
halt des Akkumulators um eine Stelle nach rechts oder links ver¬ 
schoben. 

ASL (Arithmetic Akkumulator- oder Speicherinhalt eine 

Shift Left) Stelle links schieben Bit 7 wird in das 

CARRY-Bit übergeben, Bit 0 wird 0 
(Abbildung 3.2). 



3.2 Der Befehl ASL 


Akkumulator- oder Speicherinhalt eine 
Stelle nach rechts schieben. Bit 0 wird in 
das CARRY-Bit übergeben, Bit 7 wird 
0 (Abbildung 3.3). 



3.3 Der Befehl LSR 


LSR (Logical 

Shift Right) 
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ROL (Rotate Left) 


Akkumulator- oder Speicherinhalt wird 
eine Stelle nach links geschoben. Dabei 
übernimmt Bit 0 das CARRY-Bit, dieses 
aber übernimmt den Inhalt von Bit 7 
(Abbildung 3.4). 



3.4 Der Befehl ROL 


ROR (Rotate Right) Akkumulator- oder Speicherinhalt wird 

eine Stelle nach rechts geschoben. Das 
CARRY-Bit wird nach Bit 7 und Bit 0 
ins CARRY-Bit geschrieben (Abbildung 
3.5). 



3.5 Der Befehl ROR 


3.7 Statusregister-Befehle 

Die einzelnen Bit des Statusregisters werden nicht nur durch Opera¬ 
tionen gesetzt, sondern können auch durch Befehle gesetzt oder zurück¬ 
gesetzt werden. 


CLC 

(Clear Carry) 

o 

II 

o 

CLD 

(Clear Decimal) 

D = 0 

CLI 

(Clear Interrupt) 

1 =0 

CLV 

(Clear Overflow) 

v = o 

SEC 

(Set Carry) 

C = 1 

SED 

(Set Decimal) 

D = 1 






















SEI (Set Interrupt) 


I = 1 


3.8 Verschiedene Befehle 

Die letzte Befehlsgruppe enthält Befehle, die verschiedene Eigen¬ 
schaften haben. 


NOP (No Operation) Leerbefehl 

BRK (Break) Software Interrupt 



3.6 Transportbefehle 


In der Abbildung 3.6 sind alle Transportbefehle zwischen den Speicher 
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und den Registern zusammengestellt. 
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Adressierungs 

arten 


4. Die Adressierungsarten 

Im letzten Kapitel haben wir die verschiedenen Befehlsarten des 6502 
kennengelernt. Diese Befehle müssen nun noch durch Angabe der 
Adresse erweitert werden. Es muß also der Speicherplatz anaeaeben 
werden, auf welchen die Operation angewendet werden soll. Es gibt 
allerdings eine Befehlsgruppe, die keine Adressierung benötigt. Dies 
sind 1 Byte Befehle, wie TAX oder TYA. Hier ist die Adresse schon 
im Operationscode enthalten. TAX bedeutet, daß der Inhalt des Akku¬ 
mulators in das X-Register übertragen werden soll. 

Bei einer zweiten Gruppe von Befehlen genügt eine Adressenangabe. 
Das sind z. B. Befehle, die sich auf einen besonderen Speicherbereich 
beziehen, nämlich auf die SEITE NULL (ZERO PAGE) des Speichers. 
Darunter versteht man die ersten 256 Speicherplätze mit den Adressen 
S00 bis SFF. Nach diesen 2 Byte Befehlen gibt es noch Befehle, die 3 
Byte belegen. Bei diesen wird in den, auf den Operationscode folgenden 
Byte die vollständige Adresse abgelegt. Hierbei gilt bei 6502 Systemen 
folgende Konvention: Bei der Adressangabe wird zuerst der nieder¬ 
wertige Adressteil, dann der höherwertige Adressteil gespeichert (siehe 
Abbildung 4.1). 


OP 


1 Byte Befehl, wie TAX, TAY, PLP 


OP AD 


2 Byte Befehl, wie STA in ZEROPAGE 


OP 


ADL 


ADH 


3 Byte Befehl, wie LDX mit Zeile 8AFCD 


4.1 Befehlsaufbau beim 6502 
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Im Gegensatz zu anderen Prozessortypen weist der 6502 13 verschie¬ 
dene Adressierungsmöglichkeiten auf, die nun im folgenden besprochen 
werden. 


4.1 Die unmittelbare Adressierung 

Diese Adressierungsart belegt 2 Byte. Dabei wird im 2. Byte nicht eine 
Adresse sondern ein Datenbyte gespeichert. 

Beispiel: LDX # $C9 

In Worten ausgedrückt, bedeutet dies: Lade das X-Register mit dem 
Wert $C9. Die meisten Assembler benutzen zur Kennzeichnung der 
unmittelbaren Adressierung das # (Number) Zeichen. 


4.2 Die absolute Adressierung 

Bei dieser Form der Adressierung folgt auf das Byte mit dem Opera¬ 
tionscode die vollständige Adresse. Dabei wird im 2. Byte der nieder¬ 
wertige Adressteil, im 3. Byte der höherwertige Adressteil gespeichert. 

Beispiel: JMP $00 $30 , Springe zur Adresse $3000. 


4.3 Die absolute Adressierung der Seite 0 (Zero Page) 

Für die ersten 256 Zellen eines Speichers mit den Adressen $00 bis $FF 
genügt nur eine Adressenangabe. 

Beispiel: STA $10 , Speichere den Akkumulatorinhalt in die Zelle $10. 
Diese Adressierung belegt nur 2 Byte, und die Befehlszykluszeit ist 
kürzer als bei der normalen absoluten Adressierung. Deshalb wird man 
Speicherzellen, auf die man häufig zugreift, in diese Seite 0 legen. 


4.4 Die indizierte Adressierung 

Die dem Operationscode folgende Adresse wird durch den Inhalt des 
X- oder des Y-Registers verändert. Und zwar wird der Inhalt des Index¬ 
registers zum niederwertigen Adressbyte hinzugezählt. Dies ergibt dann 
die richtige Adresse. 
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Beispiel: LDA $300, X. Lade den Akkumulator mit der Zelle die sich 
aus der Summe von $300 und X-Registerinhalt ergibt. Mit X = 1 wird 
also der Inhalt der Zelle $301 mit X = $10 der Inhalt der Zelle $310 
in den Akkumulator übernommen. 

Bei der Bildung der Summe von Adressbyte und Inhalt des Index¬ 
registers wird ein eventueller Übertrag in das 3. Byte übernommen. 

Beispiel: STA $210, Y . Mit Y = $FF wird der Akkumulatorinhalt in 
die Zelle $30F gespeichert. Die indizierte Adressierung ist auch mit 
einer Adresse der Seite 0 möglich. Tritt hier aber bei der Bildung der 
Summe von Adresse und Indexregisterinhalt ein Übertrag auf, so wird 
dieser nicht berücksichtigt. 

Beispiel: STA $10, X . Mit X = $FF wird der Akkumulatorinhalt in die 
Zelle $0F gespeichert. 


4.5 Die indirekte Adressierung 

Bei der indirekten Adressierung ist der dem Operationscode folgende 
Adressteil nicht die Zieladresse, sondern der Inhalt der durch die 
Adresse angegebenen Zelle ist die effektive Adresse. 

Bei den 6502 System ist diese Art der Adressierung nur beim Sprung¬ 
befehl implementiert. 

Beispiel: JMP ($300) , Springe auf die Adresse, die als Inhalt in den 
Zellen $300 und $301 gespeichert ist. Die Angabe der Adressen, ein¬ 
geschlossen in runden Klammern, bedeutet, daß nicht die Adresse $300 
sondern der Inhalt dieser Adresse das Sprungziel ist. 

Ein schönes Beispiel für die Verwendung des indirekten Sprunges findet 
man in der Monitor-Routine des APPLE II Computers, die ein Zeichen 
auf den Bildschirm ausgibt. 


SFDED JMP (CSWL) 
$FDFO CMP #$A0 
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In Zelle SFDED ist ein indirekter Sprung über die mit CSWL bezeich- 
nete Zelle programmiert. Schaut man in dieser Zelle nach, welchen 
Inhalt sie hat, so findet man dort die Adresse SFDFO, also die Adresse 
des folgenden Befehles. Diese Art Der Programmierung hat folgenden 
Zweck. Jedesmal, wenn ein Zeichen auf den Bildschirm ausgegeben 
werden soll, wird diese Befehlsfolge durchlaufen. Möchte man das 
Zeichen aber auch noch auf ein anderes Gerät ausgeben, z. B. auf 
einen Drucker, so wird der Inhalt der Zelle CSWL durch die Adresse 
der Druckerausgabe ersetzt und am Ende dieses Programmteils auf die 
Zelle SFDFO gesprungen. 

Eine Kombination von indirekter und indizierter Adressierung bildet 
die indiziert-indirekte und die indirekt-indizierte Adressierung. In 
beiden Fällen ist die Basisadresse immer eine Adresse aus der Seite 0. 


4.6 Die indiziert-indirekte Adressierung 

Diese Art der Adressierung macht man sich am besten an einem Beispiel 
klar: 

LDA (S10, X) bedeutet: Zuerst wird zum Adressbyte S10 der Inhalt 
des Indexregisters addiert. Dies ergibt eine neue Adresse, deren Inhalt 
die eigentliche Zieladresse darstellt. Abbildung 4.2 soll dies verdeut¬ 
lichen. 


In den Zellen $10 und $11 ist die Adresse $1000, in den Zellen $12 
und $13 die Adresse $2000 und in den Zellen $14 und $15 die Adresse 
$3000 gespeichert (Niederwertiges Adressbyte immer zuerst). Der 
Befehl LDA ($10, X) bewirkt nun, daß mit X = 0 der Inhalt der 
Speicherzelle $1000, mit X = 2 der Inhalt der Zelle $2000 und mit 
X = 4 der Inhalt der Zelle $3000 in den Akkumulator übernommen 
wird. 
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Für diese Art der Indizierung kann nur das X-Register verwendet wer¬ 
den. Tritt bei der Summenbildung Adressbyte und Inhalt des Index¬ 
registers ein Übertrag auf, so wird dieser nicht berücksichtigt. 


I 


I 



I I 

4.2 Indiziert-indirekte Adressierung 


4.7 Die indirekt-indizierte Adressierung 

Für die Indizierung wird hier das Y-Register verwendet. Der Inhalt 
des Indexregisters wird aber hier nicht zum Adressbyte, sondern zum 
Inhalt des Adressbytes addiert. Entsteht bei dieser Addition ein Über¬ 
trag, so wird dieser in der Speicherzelle Adressbyte +1 berücksichtigt. 

Beispiel: STA ($10), Y . In der Speicherzelle $10 ist $50 und in der 
Speicherzelle $11 der Wert $02 (Abbildung 4.3) gespeichert. Mit Y = 0 
wird nun der Akkumulatorinhalt in die Zelle $250, mit Y = $FF der 
Akkumulatorinhalt in die Zelle $34F gespeichert. 

I I 

i 



I l 

4.3 Indirekt-indizierte Adressierung 
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4.8 Die relative Adressierung 

Bei den 6502 Prozessoren ist eine relative Adressierung nur bei den 
Verzweigungsbefehlen implementiert. Bei dieser Art der Adressierung 
wird im auf den Operationscode folgenden Byte eine Zahl gespeichert, 
mit der der Befehlsfolgezähler relativ zum augenblicklichen Stand 
verändert wird. 

Beispiel: BEQ 05 bedeutet: Führe das Programm 5 Zellen nach dem 
augenblicklichen Stand des Befehlsfolgezählers weiter (Abbildung 4.4). 


S300 

8301 


3304 


Befehlsfolge^ 

zähler 


S30B 


Befehlsfolge^ 

zähler 

4.4 Relative Adressierung 






BEQ 

05 







BNE 

-08 



30 

























In dem angegebenen Beispiel steht der Befehlsfolgezähler bei der Ent¬ 
schlüsselung des Befehls BEQ 05 schon in Zelle 8307. Falls die Be¬ 
dingung für die Verzweigung zutrifft wird das Programm in Zelle 830B 
weitergeführt. Der Rückwärtssprung BNE —08 führt auf die Zelle 
8306, denn der Befehlsfolgezähler zeigt schon auf die Zelle S30E. 
Der Zahlenwert im Adressbyte wird also als vorzeichenbehaftete Zahl 
interpretiert. Damit sind Programmverzweigungen nur im Bereich 
— 128 bis + 127 Byte möglich. 

Bei kurzen, von hand assemblierten Programmen ist die Berechnung 
der Sprungziele immer wieder eine häufige Fehlerquelle. 

Zur Vereinfachung dieser Berechnung sind in Abbildung 4.5 und 4.6 
zwei Tabellen zur Bestimmung der Sprungdistanz angegeben. Man 
zählt vom augenblicklichen Stand, die zu überspringenden Zellen 
ab, und sucht sich den entsprechenden Flexadezimalwert aus der 
Tabelle heraus. 


LSD 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

MSD 


0 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

1 

16 

17 

18 

19 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

2 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

3 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

4 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

5 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

6 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

7 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 


4.5 Vorwärts-Verzweigungen 


LSD 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

MSD 


8 

128 

127 

126 

125 

124 

123 

122 

121 

120 

119 

118 

117 

116 

115 

114 

113 

9 

112 

111 

110 

109 

108 

107 

106 

105 

104 

103 

102 

101 

100 

99 

98 

97 

A 

96 

95 

94 

93 

92 

91 

90 

89 

88 

87 

86 

85 

84 

83 

82 

81 

B 

80 

79 

78 

77 

76 

75 

74 

73 

72 

71 

70 

69 

68 

67 

66 

65 

C 

64 

63 

62 

61 

60 

59 

58 

57 

56 

55 

54 

53 

52 

51 

50 

49 

D 

48 

47 

46 

45 

44 

43 

42 

41 

40 

39 

38 

37 

36 

35 

34 

33 

E 

32 

31 

30 

29 

28 

27 

26 

25 

24 

23 

22 

21 

20 

19 

18 

17 

F 

16 

15 

14 

13 

12 

11 

10 

9 

8 

7 

6 

5 

4 

3 

2 

1 


4.6 Rückwärtzs-Verzweigungen 
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4.9 Die implizierte Adressierung 

Bei einigen Befehlen ist die Angabe einer Adresse nicht notwendig, 
da diese schon im Operationscode enthalten ist. 

Beispiel: DEY Decrement Y-Register. 


4.10 Die Akkumulatorbezogene Adressierung 

Befehle, die direkt den Akkumulator betreffen benötigen ebenfalls 
keine weiteren Adressenangaben. Beim 6502 Prozessor sind dies nur 
Schiebebefehle. 

Beispiel: LSR Schiebe Akkumulatorinhalt eine Stelle nach rechts. 

Bis jetzt haben wir für die Befehle die memnotechnischen (leicht 
merkbaren) Ausdrücke verwendet. Für den Prozessor sind dies aber 
Bitmuster. In Abbildung 4.7 sind alle Befehle zusammengestellt, wobei 
die Bitmuster als Hexadezimalzahlen angegeben sind. 

Die Rückumwandlung von der Darstellung durch Hexadezimalzahlen in 
die memnotechnischen Bezeichnungen erfolgt durch Abbildung 4.8. 
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Befehle 

symb. 

Code 

Wirkung 

UNM 

ABS 

< 

ADRI 

> 

s 

< 

ESSII 

8 

ERUr 

K 

8 

JGS/ 

> 

8 

(RTE 

X 

Q 

z 

:n 

> 

o 

z 

-J 

Ui 

cc 

QNI 

ACCU 

-i 

Q. 

z 

N 

z 

c 

1 

D 

V 

Transport 

LDA 

M-*A 

A9 

AD 

BD 

B9 

A5 

B5 


AI 

Bl 





X 

X 

- 

- 

- 

_ 


LDX 

M -*• X 

A2 

AE 


BE 

A6 


B6 







X 

X 

- 

- 

- 

- 


LDY 

M Y 

AO 

AC 

BC 


A4 

B4 








X 

X 

- 

- 

- 

- 


STA 

A -*■ M 


8D 

9D 

99 

85 

95 


81 

91 












STX 

X-" M 


8E 



86 


96 














STY 

Y-»M 


8C 



84 

94 















TAX 

A -+ X 













AA 

X 

X 

- 

- 

- 

- 


TAY 

A -*■ Y 













A8 

X 

X 

- 

- 

- 

- 


TXA 

X-> A 













8A 

X 

X 

- 

- 

- 

- 


TYA 

Y-A 













98 

X 

X 

- 

- 

- 

- 


TXS 

x-s 













9A 








TSX 

S-X 













BA 

X 

X 

- 

— 

- 

- 


PLA 

S+1 -*S, Ms-*- A 













68 

X 

X 

- 

- 

- 

- 


PHA 

A -*• Ms, S-1 -S 













48 








PLP 

S+1 -*• S, Ms - P 













28 








PHP 

P - Ms, S-1 -* S 













08 







Arithmetische 

ADC 

A+M+C -*> A 

69 

CD 

7D 

79 

65 

75 


61 

71 





X 

X 

X 

_ 

_ 

X 


SBC 

A-M-C-A 

E9 

ED 

FD 

F9 

E5 

F5 


El 

Fl 





X 

X 

X 

- 

- 

X 


INC 

M+1 -*• M 


EE 

FE 


E6 

F6 








X 

X 

- 

- 

- 

- 


DEC 

M—1 -*■ M 


CE 

DE 


C6 

D6 








X 

X 

- 

— 

— 

— 


INX 

X+1 -*>X 













E8 

X 

X 

- 

- 

- 

- 


DEX 

X-1 -> X 













CA 

X 

X 

- 

- 

- 

- 


INY 

Y+1 -*• Y 













C8 

X 

X 

- 

- 

- 

- 


DEY 

Y—1 - Y 













88 

X 

X 

— 

_ 

_ 

— 

Logische 

AND 

aAm-+a 

29 

2D 

3D 

39 

25 

35 


21 

31 





X 

X 

_ 

_ 

_ 

_ 


ORA 

A V M -► A 

09 

OD 

ID 

19 

05 

15 


01 

11 





X 

X 

- 

- 

- 

- 


EOR 

AVM-A 

49 

4D 

5D 

59 

45 

55 


41 

51 





X 

X 

- 

- 

- 

- 

Vergleichs- 

CMP 

A-M 

C9 

CD 

DD 

D9 

C5 

D5 


CI 

Dl 





X 

X 

X 

_ 

_ 

_ 


CPX 

X-M 

EO 

EC 



E4 









X 

X 

X 

- 

- 

- 


CPY 

Y-M 

CO 

cc 



C4 









X 

X 

X 

- 

- 

- 


BIT 

A A M 


2C 



24 









7 

X 

- 

- 

- 

6 

Verzweigungs- 

BCC 

BRANCH ON C=0 









90 












BCS 

BRANCH ON C*1 









BO 












BEQ 

BRANCH ON Z=1 









FÖ 












BNE 

BRANCH ON Z=0 









DO 












BMI 

BRANCH ON N=1 









30 












BPL 

BRANCH ON N=0 









10 












BVC 

BRANCH ON V=0 









50 












BVS 

BRANCH ON V=1 









70 












JMP 


4C 










6C 










JSR 


20 













— 

- 

— 

_ 

— 

— 

Schiebe- 

ASL 


OE 

IE 


06 

16 







OA 


X 

X 

X 

_ 

_ 

_ 


LSR 


4E 

5E 


46 

56 







4A 


X 

X 

X 

- 

- 

- 


ROL 


2E 

3E 


26 

36 







2A 


X 

X 

X 

- 

- 

- 


ROR 


6E 

7E 


66 

76 







6A 


X 

X 

X 

- 

- 

- 

Status-Register- 

CLC 

C=0 













18 

- 

- 

0 

- 

- 

- 


CLD 

D=0 













D8 

— 

— 

— 

— 

0 

— 


CLI 

1=0 













58 

- 

— 

— 

0 

— 

- 


CLV 

V=0 













B8 






0 


SEC 

C=1 













38 

- 

- 

1 

- 

— 

— 


SED 

D»1 













F8 

- 

- 

- 

- 

1 

- 


SEI 

1=1 













78 

- 

- 

- 

1 

- 

- 

Versch. 

NOP 

NO OPER 













EA 








RTS 

RETURN F.SUB 













60 








RTI 

RETURN F. INT 













40 








BRK 

BREAK 













00 

- 

- 

- 

1 

- 

- 


4.7 Befehlsliste der 6502 CPU 
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LSD 

0 

1 

2 

3 

4 

5 

6 

7 

MSC 


0 

BRK 

ORA-IND, X 




ORA-Z PAGE 

ASL-Z PAGE 


1 

BPL 

ORA-IND, Y 




ORA-Z PAGE, X 

ASL-Z PAGE 


2 

JSR 

AND-IND, X 



BIT-Z Page 

AND-Z PAGE, 

ROL-Z PAGE 


3 

BMI 

AND-IND, Y 




AND-Z PAGE, X 

ROL-Z PAGE, X 


4 

RTI 

EOR-IND, X 




EOR-Z PAGE 

LSR—ZPAGE 


5 

BVC 

EOR-IND, Y 




EOR-Z PAGE, X 

LSR—Z PAGE, X 


6 

RTS 

ADC-IND. X 




ADC-Z PAGE 

ROR-Z PAGE 


7 

BVS 

ADC-IND, Y 




ADC-Z PAGE, X 



8 


STA—IND, X 



STY-Z Page 

STA-Z PAGE 

STX-Z PAGE 


9 

BCC 

STA—IND, Y 



STY-Z Page, X 

STA-Z PAGE, X 

STX-Z PAGE, Y 


A 

LDY-IMM 

LDA-IND, X 

LDX-IMM 


LDY-Z Page 

LDA-Z PAGE 

LDX-Z PAGE 


B 

BCS 

LDA-IND, Y 



LDY-Z Page, X 

LDA-Z PAGE, X 

LDX-Z PAGE, Y 


C 

CPY-IMM 

CMP—IND, X 



CPY-Z Page 

CMP—ZPAGE 

DEC-Z PAGE 


D 

BNE 

CMP-IND, Y 




CMP—Z PAGE, X 

DEC-Z PAGE, X 


E 

CPX-IMM 

SBC—IND, X 



CPX-Z Page 

SBC—ZPAGE 

INC-Z PAGE 


F 

BEQ 

SBC—IND, Y 




SBC—Z PAGE, X 

INC-Z PAGE, X 



LSD 

8 

9 

A 

B 

C 

D 

E 

F 

MSC 


0 

PHP 

ORA-IMM 

ASL-A 



ORA-ABS 

ASL-ABS 


1 

CLC 

ORA-ABS, Y 




ORA-ABS, X 

ASL—ABS, X 


2 

PSP 

AND-IMM 

ROL-A 


BIT-ABS 

AND-ABS 

ROL-ABS 


3 

SEC 

AND-ABS, Y 




AND-ABS, X 

ROL-ABS, X 


4 

PHA 

EPR-IMM 

LSR—A 


JUMP-ABS 

EOR-ABS 

LSR—ABS 


5 

CLI 

EOR-ABS, Y 




EOR-ABS, X 

LSR—ABS, X 


6 

PLA 

ADC-IMM 

ROR-A 


JMP-IND 

ADC-ABS 

ROR-ABS 


7 

SEI 

ADC-ABS, Y 




ADC-ABS, X 



8 

DEY 


TXA 


STY-ABS 

STA-ABS 

STX-ABS 


9 

TYA 

STA-ABS, Y 

TXS 



STA-ABS. X 



A 

TAY 

LDA-IMM 

TAX 


LDY-ABS 

LDA-ABS 

LDX-ABS 


B 

CLV 

LDA-ABS, Y 

TSX 


LDY-ABS, X 

LDA-ABS, X 

LDX-ABS, Y 


C 

INY 

CMP—IMM 

DEX 


CPY-ABS 

CMP—ABS 

DEC-ABS 


D 

CLD 

CMP—ABS, Y 




CMP—ABS, X 

DEC-ABS, X 


E 

INX 

SBC—IMM 

NOP 


CPX-ABS 

SBC—ABS 

INC-ABS 


F 

SED 

SBC—ABS, Y 




SBC—ABS, X 

INC-ABS, X 



4.8 Bitmusterverteilung der 6502 CPU 
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Programm¬ 

entwicklung 


5. Programmentwicklung 

Programmieren bedeutet das Umsetzen einer Aufgabe in die Sprache 
des Computers. Ist diese Sprache eine höhere Programmiersprache, so 
ist dieses Umsetzen relativ einfach. Ein Umsetzen in den Maschinen¬ 
code bedeutet aber eine viel genauere Formulierung der Aufgabe und 
ein Zerlegen in einzelne Schritte, die den Befehlen des Computers 
entsprechen. 

Betrachten wir hierzu folgende Aufgabe: 

Addiere die Zahlen 3 und 5 und gebe das Ergebnis auf den 
Bildschirm aus. 

Die Lösung in BASIC ist einfach: 

10 A = 3 
20 B = 5 
30 PRINTA + B 
40 END 

Die Lösung dieser Aufgabe durch Maschinensprache erfordert aber vor 
der Programmierung noch weitere Angaben: 

a) Werden diese Zahlen durch 8-bit, 16-bit oder durch ein Gleitkomma¬ 
format dargestellt? 

b) Sind es Zahlen mit oder ohne Vorzeichen? 

c) Wo sind die Zahlen im Rechner gespeichert? 

d) Bei Gleitkommazahlen: Gibt es Unterprogramme zur Gleitkomma¬ 
addition und zur Ausgabe einer Gleitkommazahl auf den Bildschirm? 
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c) Bei 8-bit oder 16-bit Zahlen: Gibt es ein Unterprogramm zur Aus¬ 
gabe dieser Zahl auf den Bildschirm? 

Erst wenn diese Fragen geklärt sind, kann das Programm geschrieben 
werden. 

Umfangreiche Programme wird man zuerst in Teilaufgaben zerlegen und 
auf den Papier durch ein Flußdiagramm oder ein Struktogramm dar¬ 
stellen. Die Elemente eines Flußdiagramms sind in Abbildung 5.1 zu¬ 
sammengestellt. In einem Rechteck werden ein oder mehrere An¬ 
weisungen angeführt. Bilden diese Anweisungen ein vollständiges Unter¬ 
programm, so werden die Seiten durch zwei Striche markiert. Eine Ab¬ 
frage wird durch eine Raute dargestellt. Die Ausgänge werden be¬ 
zeichnet (JA/NEIN oder Bedingung erfüllt, Bedingung nicht erfüllt). Ein 
Kreis bildet Ein- oder Ausgang des Programms oder eines Unterpro¬ 
gramms. Abbildung 5.2 ist das Flußdiagramm zur "Erstellung eines 
Programms". Diese einzelnen Schritte wollen wir uns mal näher be¬ 
trachten : 


Ein- oder mehrere Programmanweisungen 


Unterprogramme 



Programmverzweigungen 



Beginn und Ende des Programms 


Flußdiagramm-Symbole 
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START 























































Es beginnt mit der Formulierung der Aufgabe. Je genauer und aus¬ 
führlicher eine Aufgabe beschrieben wird, desto einfacher ist die Pro¬ 
grammierung. Ist das Programm eine Auftragsprogrammierung, so ist 
es ratsam, an dieser Stelle ein Pflichtenheft einzuführen, in dem Umfang 
und Ziele des Programms festgelegt sind. Dieses Pflichtenheft ist dann 
sehr nützlich, wenn später Wünsche zur Programmumgestaltung ge¬ 
äußert werden. 

Danach müssen Lösungsmöglichkeiten und Lösungsverfahren (Algo¬ 
rithmen) gefunden werden. 

Die eigentliche Programmierung beginnt mit der Zerlegung in einzelne 
Teilaufgaben. Diese Zerlegung erleichtert die Programmerstellung. 
Kleinere Programmodule sind überschaubar und leichter zu testen. 
Danach folgt das Programmschreiben in Assembler. 

Die eigentliche Übersetzung oder Assemblierung des Programms kann 
auf die verschiedenste Weise erfolgen. Die unterste Stufe ist hierbei die 
"Assemblierung von Hand", wobei das Programm mit Hilfe einer Ta¬ 
belle der Operationscodes,auf den Papier übersetzt wird und die Bit¬ 
muster über eine Tastatur in den Rechner eingegeben werden. 

Die oberste Stufe bildet die Verwendung eines Cross-Compilers mit 
Simulation auf einem Groß-Computer. 

Dazwischen liegen die auf den einzelnen Kleinrechnern zu verwenden¬ 
den Assembler, mit ihren, meist durch die Systemkonfiguration be¬ 
dingten Einschränkungen. Auf diese Assembler werden wir in den 
nächsten Kapiteln noch näher eingehen. 

Ist im Rechner ein erstes ausführbares Teilprogramm gespeichert, so 
beginnt die Testphase. Man beginnt mit dem Testen kleiner Teilstücke. 
Sollte sich nach ungefähr 10 Testläufen zeigen, daß immer noch Fehler 
im Programmteil auftreten, so ist es besser, noch einmal bis zur Auf¬ 
stellung der Lösungsmöglichkeiten zurückzugehen und das Lösungs¬ 
verfahren neu zu überdenken. Das gleiche gilt auch für das vollständige 
Programm. Oft ist es erheblich schneller, ein Programm neu zu schrei¬ 
ben, als im vorliegenden Programm herumzuflicken. 

Sind alle Fehler beseitigt, das Programm läuft, so beginnt ein weiterer 
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wichtiger Punkt: Die Programmdokumentation. Dieser Punkt wird in 
vielen Fällen übergangen (Man weiß ja, was man programmiert hat !). 
Diese Fehleinschätzung rächt sich später oft bitter. 

Eine Programmdokumentation solte folgende Punkte enthalten: 

Eine Kurzbeschreibung der Aufgabe (Programmspezifikation), 
eine Beschreibung der verwendeten Algorithmen, 
eine Beschreibung der Unterprogramme, 

einen Speicherbelegungsplan, mit Angabe der verwendeten Speicher¬ 
zellen und ihrer Bedeutung und 
die verwendeten Flußdiagramme. 

Die letzte Abfrage bezieht sich dann auf Programmänderungen. Werden 
keine Änderungen gewünscht, hat man Glück gehabt, und ist mit der 
Programmierung fertig. 

In den meisten Fällen werden aber Programmänderungen gewünscht. 
Kleine Änderungen werden in den Teilprogrammen durchgeführt 
und man beginnt neu mit der Assemblierung. Bei großen Änderungs¬ 
wünschen beginnt man am bestem mit einer Neuprogrammierung. 
Bei solch einen Fall erweist sich die Vorlage eines Pflichtenheftes als 
äußerst nützlich. 


Zwei alte Programmierweisheiten werden aber immer bleiben: 

1. Jede kleine Programmänderung hat mindestens 10 große Änder¬ 
ungen zur Folge. 

2. Bei der ersten Vorführung des Programms wird zum erstenmal 
jene Programmschleife durchlaufen, die noch einen Fehler ent¬ 
hält. 


5.1 Aufbau eines Assemblerprogramms 

Das Niederschreiben eines Programms erfolgt am besten in der Schreib¬ 
weise, wie sie auch für die Eingabe in die Assembler verwendet wird. 
Leider hat sich hierfür keine einheitliche Formulierung gebildet. Es gibt 
Unterschiede, auf die noch eingegangen werden muß. Im allgemeinen 
wird aber eine Eingabezeile in einen Assembler folgendermaßen auf- 
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geteilt: 


MARKENFELD 

ASS. 

BEFEHL 

ADRESSIERUNG 

KOMMENTAR 










Für Programme in diesem Buch, die sich nicht auf einen bestimmten 
Assembler beziehen, soll folgende Vereinbarung gelten: Das Markenfeld 
kann bis 6 Zeichen lang sein, das erste Zeichen muß ein Buchstabe sein. 
Es folgt die Angabe des memnonischen Codes mit 3 Zeichen und an¬ 
schließend die Art der Adressierung. Das Kommentarfeld wird vom 
Adressfeld durch einen Strichpunkt (;) getrennt. Dies ist eine Kon¬ 
vention, die bei vielen Assemblern anzutreffen ist. 


5.2 Ein erstes Beispiel und "Assemblierung von Hand" 

Als erstes Bespiel wollen wir das im vorigen Kapitel angeführte Beispiel 
von der Addition zweier Zahlen (3 + 5) in Maschinencode program¬ 
mieren. 


Dazu folgende Angaben: 


3 und 5 sind 16-bit Zahlen ohne Vorzeichen. Die Zahl 3 ist in Zelle 
810 und $11, die Zahl 5 ist in Zelle 812 und 813 gespeichert. Diese 
Speicherung erfolgt immer in der Reihenfolge LSB, MSB. 


Zur Ausgabe auf den Bildschirm wird ein Unterprogramm PRTBYT 
verwendet, das den Inhalt eines Speicherplatzes als 2 Hexadezimal¬ 
zahlen ausgibt. Dieses- Unterprogramm, sowie auch die Rücksprung¬ 
adresse MONITO sind bei jedem 6502 Computer verschieden. 









Assemblerprogramm 

LDA 

#$03 

STA 

$10 

LDA 

#$05 

STA 

$12 

LDA 

#$00 

STA 

$11 

STA 

$13 

CLC 


LDA 

$10 

ADC 

$12 

STA 

$10 

LDA 

$11 

ADC 

$13 

STA 

$11 

JSR 

PRTBYT 

LDA 

$10 

JSR 

PRTBYT 

JMP 

MONITO 


3-* Akkumulator 

Akkumulator -*■ Zelle $10 

5 Akkumulator 

Akkumulator -> Zelle S12 

0 -*■ Akkumulator 

Akkumulator-* $11 

Akkumulator -+ $13 

Löschen des Carry-Bit 

Inhalt der Zelle $10 -* Akkumulator 

Addiere dazu den Inhalt von Zelle $12 

Ergebnis nach Zelle $10 speichern 

Lade Akkumulator mit Inhalt von Zelle $11 

Addiere dazu den Inhalt von Zelle $13 

Ergebnis nach Zelle $11 

und Ausgabe auf Bildschirm (MSB zuerst) 

Inhalt von $10 -* Akkumulator 

Ausgabe auf Bildschirm 

Sprung in den Monitor . 


5.4 Addition der Zahlen 3 und 5 


Dieses Programm soll nun mit der Papier und Bleistift Methode in den 
Maschinencode übertragen werden. Dazu benötigen wir ein Blatt 
karriertes Papier und die Operationscode-Tabelle in Abbildung 4.7. 
Man kann auch ein Codierblatt (Abbildung 5.6) benützen. 


Bei dieser Umsetzung ist als Kommentar nicht wie in Abbildung 5.4 die 
Wirkung des Befehls, sondern die Adressierungsart angegeben. Vorher 
muß noch festgelegt werden, an welchem Speicherplatz das Programm 
beginnen soll. Die Startadresse, also die Adresse des ersten gültigen 
Operationscodes,soll die Zelle $800 sein. Eine Zeile des assemblierten 
Programms hat dann folgendes Aussehen: 








Speicher¬ 

zelle 

Code 

Marke 

Ass. 

Befehl 

Adressierung 

Kommentar 
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Assembliertes Programm: 


$800 

A9 03 

LDA 

#$03 

; unmittelbare Adressierung 

S802 

85 10 

STA 

$10 

; absolute Adressierung, Zero-P. 

$804 

A9 05 

LDA 

#$05 


$806 

85 12 

STA 

$12 


$808 

A9 00 

LDA 

#$00 


$80A 

85 11 

STA 

$11 


$80C 

85 13 

STA 

$13 


$80 E 

18 

CLC 


; implizierte Adressierung 

$80 F 

A5 10 

LDA 

$10 

; absolute Adressierung, Zero-P. 

$811 

65 12 

ADC 

$12 

; absolute Adressierung, Zero-P. 

$813 

85 10 

STA 

$10 


$815 

A5 11 

LDA 

$11 


$817 

65 13 

ADC 

$13 


$819 

85 11 

STA 

$11 


$81B 

20 DA FD 

D JSR 

PRNBYT 

; Unterprogrammsprung 

$80 E 

A5 10 

LDA 

$10 


$820 

20 DA FD 

JSR 

PRNBYT 


$823 

4C 59 FF 

JMP 

MONITO 

; Rücksprung in den Monitor 


0800- 

A9 

0A 

08 

10 

A9 

05 

85 

12 

0808- 

A9 

00 

32 

08 

85 

13 

18 

A5 

0810- 

10 

65 

12 

85 

10 

A5 

11 

65 

0818- 

13 

85 

11 

20 

DA 

FD 

A5 

10 

0820- 

20 

DA 

FD 

4C 

59 

FF 




# 


5.5 Assembliertes Programm 


1) Anmerkung: 

Die hier angegebenen Adressen beziehen sich auf den Monitor des 
APPLE II Computers. Im Kapitel 8, Monitor-Routinen sind diese 
Unterprogramm-Adressen für andere 6502-Systeme angegeben. 
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Dieses Programm ist recht einfach zu codieren, denn es treten keine 
Marken, und somit keine Verzweigungen auf. Der Maschinencode ist 
nun zu Papier gebracht und soll nun in den Rechner eingegeben werden. 
Diese Eingabe kann nur über das Betriebssystem des Rechners, dem 
Monitor erfolgen. 


5.3 Monitor 

Der rein elektronische Zusammenbau CPU (Central-Prozessing Unit), 
RAM (Random Access Memory) und I/O-Baustein stellt noch kein 
lauffähiges Mikro-Prozessorsystem dar. Dazu wird noch ein Betriebs¬ 
system benötigt, daß in einem ROM (Read Only Memory) abgelegt 
ist und dafür sogt, daß Programme z. B. von Kassette eingelesen oder 
gespeichert werden können, daß Eingaben über Tastenfeld gemacht 
werden oder Zeichen über den Bildschirm ausgegeben werden. Beim 
Einschalten des Rechners wird automatisch ein Sprung in ein Pro¬ 
gramm ausgeführt, dessen Adresse in den Zellen SFFFC und SFFFD 
(RESET-Vektor) gespeichert ist. 


Dieses Programm ruft entweder sofort BASIC auf (APPLE, CBM, 
ATARI, VC20) oder wartet auf eine Eingabe (C1P, AIM 65, SYM, 
KIM). Die Befehle für die Eingabe von Hexadezimalzahlen, Ändern 
des Inhalts von Speicherzellen usw. werden für die einzelnen Rechner 
im Kapitel 8 beschrieben. Hierwollen wir Monitor-Befehle des APPLE II- 
Rechners benutzen. Der Code des Programms in Abbildung 5.5 soll in 
den Rechner geschrieben und ausgeführt werden. Dazu wird mit CALL- 
151 der Monitor aufgerufen und danach mit 800: die Anfangsadresse 
des Programms und die Bitmuster der Operationscode, getrennt durch 
einen Zwischenraum eingegeben. Die Speicherzellen von S800 bis 
S825 haben dann folgenden Inhalt (Abbildung 5.5). Mit 800G wird 
das Programm gestartet. Als Ausdruck erscheint das Ergebnis auf dem 
Bildschirm: 0008. 
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ELCOMP Software 

Aufgabe | Datum j Blatt 


Aufgabe | Datum platt 


Speicher¬ 

zelle 

Code 

Marke 

Ass. 

Befehl 

Adressierung 

Kommentar 

































































































































































































symb. Adressen 



symb. Namen 
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5.6 Codierblatt 


















































5.4 Zweites Beispiel: Eingabe von Hexadezimalzahlen 

Das vorige Beispiel wird nun erweitert. Die Zahlen sollen über das 
Tastenfeld eingegeben werden. Die Addition zweier 16-Bit Zahlen wird 
als Unterprogramm geschrieben. Dabei wird ein Fehler angezeigt, wenn 
bei dieser Addition ein Übertrag auftritt, d. h. wenn sich das Ergebnis 
nicht mehr als 16-bit Zahl darstellen lässt. 

Zuerst die Eingaberoutine: 

Ein Unterprogramm im Monitor, GETCHR, fragt laufend das Tasten¬ 
feld ab, ob eine Taste betätigt wird. Ist dies geschehen, so wird dieses 
Zeichen als ASCII (American Standard Code for Information Inter¬ 
change) Zeichen in den Akkumulator übernommen. In Abbildung 5.7 
sind die ASCII-Zeichen zusammengestellt. 


LSD 

MSB 

0 

000 

1 

001 

2 

010 

3 

011 

4 

100 

5 

101 

6 

110 

7 

111 

0 

0000 

NUL 

DLE 

SP 

0 

@ 

P 


P 

1 

0001 

SOH 

DC1 

! 

1 

A 

Q 

a 

q 

2 

0010 

STX 

DC2 

" 

2 

B 

R 

b 

r 

3 

0011 

ETX 

DC3 

# 

3 

C 

S 

c 

s 

4 

0100 

EOT 

DC4 

S 

4 

D 

T 

d 

t 

5 

0101 

ENQ 

NAK 

% 

5 

E 

U 

e 

u 

6 

0110 

ACK 

SYN 

& 

6 

F 

V 

f 

V 

7 

0111 

BEL 

ETB 

• 

7 

G 

w 

9 

w 

8 

1000 

BS 

CAN 

( 

8 

H 

X 

h 

X 

9 

1001 

HT 

EM 

) 

9 

1 

Y 

i 

y 

A 

1010 

LF 

SUB 

* 


J 

z 

i 

z 

B 

1011 

VT 

ESC 

+ 

• 

K 

[ 

k 

{ 

C 

1100 

FF 

FS 


< 

L 

\ 

1 

1 

D 

1101 

CR 

GS 

— 

= 

M 

] 

m 

} 

E 

1110 

SO 

RS 


> 

N 

t 

n 

'Vf 

F 

1111 

Sl 

VS 

/ 

? 

0 


o 

DEL 


5.7 ASCII-Zeichen 


Die Hexadezimalzahlen 0 bis 9 werden durch die Zeichen 30 bis 39 
(APPLE: BO bis B9), A bis F durch die Zeichen 41 bis 46 (APPLE: 
CI bis C6) dargestellt. In dem Unterprogramm PACK wird das durch 
GETCHR in den Akkumulator übernommene Zeichen überprüft, ob 
es eine Hexadezimalzahl darstellt. Trifft dies zu, wird es in den Eingabe¬ 
puffer (zwei Zellen in der Zero-Page) übergeben. Ist es keine Hexa- 
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dezimalzahl, wird das Unterprogramm, mit dem ASCI I-Zeichen im 
Akkumulator, verlassen. 

Bei der Formulierung dieser Aufgabe werden wir für Sprungziele 
(Marken) und Speicherzellen symbolische Namen verwenden. In dem 
Kommentar wird mit < A > der Inhalt des Akkumulators bezeichnet. 
Genauso wollen wir mit < M > den Inhalt einer Speicherzelle, mit < X > 
den Inhalt des X-Registers und mit < Y ) den Inhalt des Y-Registers 
bezeichnen. 

Die Assemblierung erfolgt wiederum mit der Papier und Bleistift 
Methode. 


Unterprogramm PACK: 

PACK CMP #SBO 
BMI FIN 
CMP #SC6 
BPL FIN 
CMP #SBA 
BMI ZAHL 
CMP #SC1 
BMI FIN 
CLC 

ADC #809 
ZAHL ASL 
ASL 
ASL 
ASL 

LDY #804 
ZAHL1 ROL 

ROL INL 
ROL INH 
DEY 

BNEZAHL1 
LDA #800 
FIN RT8 


Vergleiche < A > mit SBO 
wenn kleiner, keine Hex-Zahl 
Vergleiche ( A > mit SC6 
wenn größer, keine Hex-Zahl 
Vergleiche < A > mit 8BA 
wenn kleiner, dann Zahl von 0 — 9 
Vergleiche < A > mit SCI 
wenn kleiner, keine Hex-Zahl 
sonst Hex-Zahl A bis F, damit 

< A > + 9 notwendig 

< A ) 4 mal nach links 
schieben. Wenn vorher < A ) = SCI 
ist danach < A > = 810 

< Y> = 4 

Der < A ) wird nach INL und 
(INL > wird nach INH geschoben 
INL, INH Eingabepuffer 

< Y > = < Y > — 1 

Wenn (Y > £ 0; Rücksprung nach 
Zahll; 0 -*■ A 

Rückkehr ins Hauptprogramm 


5.8 Unterprogramm PACK 



Hier bedarf die Befehlsfolge 


ROL 

ROL INL 

ROL INH noch 
eine Erläuterung. Der Befehl ROL wird in Abbildung 3.4 erläutert. 


Der Inhalt des Akkumulators oder einer Speicherzelle wird eine Stelle 
nach links geschoben, wobei das Carry-Bit nach Bit 0 und Bit 7 ins 
Carry-Bit übernommen wird. In Abbildung 5.9 ist der Ablauf dieser 
Befehlsfolge aufgezeigt. 



ROL 


ROL INL 


ROL INH 


5.9 Befehlsfolge ROL, ROL INL, ROL INH 


Mit ROL wird Bit 7 des Akkumulators in das Carry-Bit übertragen. Mit 
ROL INL übernimmt Bit 0 von INL das Carry-Bit und übergibt Bit 7 
an das Carry-Bit. Das gleiche gilt für ROL INH. 

Nach einem 4 maligen Durchlauf in der Schleife hat INL die 4 Bit des 
Akkumulators übernommen und den Inhalt der Zellen INL und INH 
jeweils um 4 Stellen nach links verschoben. 

Dieses Programm wird jetzt von Hand assembliert. Dies verläuft genauso 
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wie im letzten Beispiel. Hier müssen allerdings noch die Sprungziele 
bestimmt werden. Vorher wird der Programmanfang auf Zelle S800 und 
die Adressen für den Eingabepuffer INL = 814 und INH = 815 festge¬ 
legt. 


Unterprogramm PACK: 


8800 

C9 B0 

PACK 

CMP 

#SB0 

8802 

30 1F 


BMI 

FIN 

8804 

C9 C6 


CMP 

#8C6 

8806 

10 1B. 


BPL 

FIN 

8808 

C9 BA 


CMP 

#8BA 

S80A 

30 07 


BMI 

ZAHL 

880C 

C9 CI 


CMP 

#8C1 

880E 

30 13 


BMI 

FIN 

8810 

18 


CLC 


8811 

69 09 


ADC 

#809 

8813 

0A 

ZAHL 

ASL 


8814 

0A 


ASL 


8815 

0A 


ASL 


8816 

0A 


ASL 


8817 

A0 04 


LDY 

#804 

8819 

2A 

ZAHL1 

ROL 


881A 

26 14 


ROL 

INL 

S81C 

26 15 


ROL 

INH 

881E 

88 


DEY 


881F 

DO F8 


BNE 

ZAHL1 

8821 

A9 00 


LDA 

#800 

8823 

60 

FIN 

RTS 



Abbildung 5.10 


Bei der Berechnung der Sprungziele muß man immer beachten, daß der 
Befehlsfolgezähler schon auf dem nächsten auszuführenden Befehl 
steht. Bei der Papier und Bleistiftmethode wird man in den meisten 
Fällen Vorwärtssprünge nicht sofort angeben können. Die Speicher¬ 
zelle, welche später diesen Byte speichern soll, markiert man durch 
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einen Strich, wie in Abbildung 5.11, dem Ausschnitt einer Hand¬ 
assemblierung. 


(J l'lil&T fO 

H) ^nH 

PA CU. 

PAClt d 

i 8 po j 

INL = j 1H# £ 

f ?oo 

C <3 'Bo 

PAOc CHP-p$dO 

% 2Ol 

3 o _ 

2 Hi T/W 

$ 2oH 

C«3 CG 

CHP #$CG 

$ 8o& 

AO 

2 PL T/W 


cg Sa 

CUP 

l foA 

3c> ££ 

2Hi ZAHL 

% foC 

cg DA 

cnp # fcA 

f 8 ob 

___ 

ßHi ’F/'V 

i8AO 

AS 

CLC 

i fAA 

cg og 

adc 

ff4t 

(PA 

Zahl all 

f SAH 

OA 

A QL 


5.11 Ausschnitte aus einer Assemblierung von Hand 


Die Sprünge zum Programmende FIN konnten noch nicht angegeben 
werden, dagegen aber der Sprung in Zelle $80A BMI ZAHL. Der 
Marke ZAHL entspricht die Adresse S813. Damit berechnet sich die 
Sprungweite folgendermaßen: 

Vor Ausführung des Sprunges steht der Befehlszähler auf Adresse S80C. 
Bis zur Adresse S813 müssen 7 Byte übersprungen werden. In den 
Speicherzellen S80A und $80B sind somit die Bitmuster 30 07 ge¬ 
speichert. 
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Der Rücksprung in Adresse $81F, BNE ZAHL1, wird auf die gleiche 
Weise bestimmt. Der Befehlsfolgezähler steht auf Adresse $821. Bis 
Adresse $819 muß um 7 Byte zurückgesprungen werden. Die Um¬ 
wandlung der Dezimalzahl 7 in eine negative Hexadezimalzahl wird mit 
Abbildung 4.6 durchgeführt. Dort findet man für —7 die Hexzahl 
$F8. 

Die Umwandlung von Dezimalzahlen in Hexadezimalzahlen für Vor¬ 
wärtssprünge erfolgt in Abbildung 4.5. Als letztes Beispiel hierzu die 
Bestimmung der Sprungweite von BMI FIN in Adresse $802. Der Be¬ 
fehlsfolgezähler zeigt auf Adresse $804, das Sprungziel FIN hat die 
Adresse $823. Damit müssen 31 = $1 F Byte übersprungen werden. 

Diese Berechnung der Sprungweiten ist bei der Programmierung und 
Assemblierung von Hand eine der häufigsten Fehlerquellen. 


** ZERO PAGE VARIABLES: 


INL 

0014 

INH 

0015 

ZI L 

0010 

ZI H 

0011 

Z2L 

0012 

Z2H 

0013 

** ABSOLUTE 

VARABLES/LABELS 








PRTBYT 

ZAHL1 

GETWD2 

FD D A 
0819 
0854 

MONITO 

FIN 

MAIN 

FF59 

0823 

0900 

GETCHR 

ADD16 

FD35 

0824 

PRHEX 

FEHLER 

FDE3 

083C 

PACK 

GETWD 

0800 

083D 

ZAHL 
GETWD1 

0813 

0843 

0800 

0800 

0800 


13 ; 

14 ; 

15 ; 

* 




* 






0800 
0800 
0800 
0800 
0800 
0800 
0800 
0800 
0802 
0804 
0806 
0808 
080A 
080C 
080E 
0810 
0811 
0813 
0814 
0815 
0816 
0817 
0819 
081A 


C9B0 
301F 
C9C6 
101B 
C9BA 
3007 
C9C1 
3013 
18 

6909 

0A 

0A 

0A 

0A 

A004 

2A 

2614 


16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 


* PACK LIEST EIN ASCII ZEI- * 

* CHEN UND UEBERGIBT ES DEM * 

« EINGABEPUFFER. * 

* * 
******#**»***********#,#**#** 


PACK 


ZAHL 


ZAHL1 


CMP #$B0 
BMI FIN 
CMP #$C6 
BPL FIN 
CMP #$BA 
BMI ZAHL 
CMP #$C1 
BMI FIN 

ADC #$09 

ASL 

ASL 

ASL 

ASL 

LDY #$04 
ROL 

R0L INL 
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081C 

2615 

40 

ROL INH 


0 81 E 

88 

41 

DEY 


081F 

D0F8 

42 

BNE ZAHL1 


0821 

A900 

43 

LDA #$00 


0823 

60 

44 FIN RTS 


0824 


47 



0824 


48 

###1*#**#«*****#****#«#***** 

0824 


49 

* 

* 

0824 


50 

* ADDITION VOM 2 16-BIT 

* 

0824 


51 

* ZAHLEN OHNE VORZEICHEN 

* 

0824 


52 

* 

ft 

0824 


53 

#**####*####***«#********«** 

0824 

18 

56 ADD16 CLC 


0825 

A510 

57 

LDA ZIL 


0827 

6512 

58 

ADC Z2L 


0829 

8510 

59 

STA Z1L 


082B 

A511 

60 

LDA Z 1 H 


082D 

6513 

61 

ADC Z2H 


082F 

8511 

62 

STA Z1H 


0831 

B009 

63 

BCS FEHLER 


0833 

20DAFD 

64 

JSR PRTBYT 


0836 

A510 

65 

LDA Z1L 


0838 

20DAFD 

66 

JSR PRTBYT 


083B 

60 

67 

RTS 


083C 

00 

68 FEHLER BRK 


083D 


71 

ft»****«****««***«*«****«***« 

083D 


72 

* 

« 

083D 


73 

* GETWD LIEST EIN 16-BIT 

* 

083D 


74 

* WORT IN DEN EINGANGS- 

* 

083D 


75 

* PUFFER. 

* 

083D 


76 

« 

ft 

083D 


77 


i« 

083D 

A900 

79 GETWD LDA #$00 ; 

;00 —> INL f INH 

083F 

8514 

80 

STA INL 


0841 

8515 

81 

STA INH 


0843 

2035FD 

82 GETWD1 JSR GETCHR 


0846 

200008 

83 

JSR PACK 

WIEDERHOLEN,BIS 

0849 

D009 

84 

BNE GETWD2 

CHR <> HEXZEICHEN 

084B 

A514 

85 

LDA INL 

LETZTE 2 ZAHLEN IN AKKU 

084D 

290F 

86 

AND #$0F 

VORLETZTE ZAHL AUSBLENDEN 

084F 

20E3FD 

87 

JSR PRHEX 

LETZTE ZAHL AUF BILDSCHIRM 

0852 

10EF 

88 

BPL GETWD1 


0854 

60 

89 GETWD2 RTS 


0900 


90 

ORG $900 


0900 


91 



0900 


92 



0900 


93 

*ttft**********ft****ff**ft****** 

0900 


94 

* 

ft 

0900 


95 

• HAUPTPROGRAMM 

* 

0900 


96 

* STARTADRESSE=$900 

« 

0900 


97 

* 

ft 

0900 


98 

ft***«««******«««**«********# 

0900 


99 



0900 


100 



0900 

203D08 

101 MAIN JSR GETWD ; 

1 ERSTE ZAHL LESEN 

0903 

A514 

102 

LDA INL 


0905 

8510 

103 

STA ZIL 


0907 

A515 

104 

LDA INH 


0909 

8511 

- 105 

STA ZIH 


090B 

203D08 

106 

JSR GETWD ; 

1 ZWEITE ZAHL LESEN 

090E 

A514 

107 

LDA INL 


0910 

8512 

108 

STA Z2L 


0912 

A515 

109 

LDA INH 


0914 

8513 

110 

STA Z2H 


0916 

202408 

111 

JSR ADD16 


0919 

4C59FF 

112 

JMP MONITO 




113 

END 



Abbildung 5.12 
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In Abbildung 5.12 ist das vollständige Programm zur Addition zweier 
16-bit Binärzahlen angeführt. 

In den Speicherzellen $800 bis $845 sind die Unterprogramme PACK, 
ADD16, und GETWD gespeichert. Das Hauptprogramm beginnt bei 
Adresse $900 und endet bei $918. 


5.5 Unterprogramme 

In den letzten Programmen sind immer Unterprogramme verwendet 
worden. Der Programmablauf: Hauptrogramm -» Unterpogramm -»• 
Hauptprogramm ist in Abbildung 5.13 dargestellt. 


Im Hauptprogramm ist in Adresse $815 ein Unterprogrammsprung nach 
Adresse $2000 programmiert. In diesem Unterprogramm wird noch¬ 
mals nach einem Unterpogramm, beginnend mit Adresse $1000 ver¬ 
zweigt (Abbildung 5.13 a). Abbildung 5.13 b zeigt den Eintrag der 
Rücksprungadressen in den Stapelspeicher. Wie schon erwähnt, belegt 
der Stapelspeicher den Adressbereich $100 bis $1FF mit $1FF als TOS 
(Top of Stack). Mit S ist in Abbildung 5.13 b der Stapelzeiger be¬ 
zeichnet. Bei der Ausführung des JSR-Befehls im Hauptprogramm zeigt 
der Befehlsfolgezähler auf Adresse $818. Diese Adresse, allerdings um 
1 erniedrigt wird in den Stapelspeicher mit ADL, ADH übertragen. 
Der Stapelzeiger, der vorher auf $1FF zeigte wird um zwei erniedrigt 
und zeigt nun auf Adresse $1 FD. Der Befehlsfolgezähler übernimmt die 
Anfangsadresse des Unterprogramms: $2000. 


Beim nächsten Unterprogrammsprung im 1. Unterprogramm wird als 
Rücksprungadresse $2005, wiederum um 1 erniedrigt, übertragen. Der 
Stapelzeiger zeigt danach auf Adresse $1FB. Im 2. Unterprogramm 
erfolgt kein weiterer Unterprogrammsprung mehr. Es wird normal 
mit RTS verlassen. Der Befehl RTS bewirkt, daß der Befehlsfolgezähler 
die Adresse $2005 übernimmt und den Stapelzeiger auf die Adresse 
$1FD hochsetzt. Das 1. Unterprogramm wird bis RTS durchlaufen. 
Jetzt wird vom Befehlsfolgezähler die Adresse $818 übernommen und 
der Stapelzeiger auf Adresse $1 FF hochgesetzt. Damit ist der Ausgangs¬ 
zustand vor dem Einsprung ins 1. Unterprogramm wieder hergestellt. 
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Hauptprogramm 


1. Unterprogramm 


2. Unterprogramm 


a) 


8815 

8816 

8817 

8818 
8819 


JSR 

00 

20 

STA 

10 


82000 


$2002 

JSR 

82003 

00 

82004 

10 

$2005 

LDX 

82006 

20 




LDA# 


00 


RTS 


81000 


RTS 


b) 

Stapelspeicher: 


81 FF 


S 

08 


08 


08 


08 

81 FE 



17 


17 


17 


17 

81 FD 





20 


20 

S 

20 

81 FC 





04 


04 


04 

81FB 






S 




81 FA 





















JSR 82000 JSR 81000 RTS RTS 


5.13 Programmablauf mit Unterprogrammsprüngen 
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In den 256 Speicherzellen des Stapels können 128 Rücksprungadressen 
gespeichert werden. Damit ist eine Schachtelung von 128 Unterpro¬ 
grammen möglich. Eine Zahl, die bei einer normalen Programmierung 
vollkommen ausreichend ist, es sei denn, man programmiert rekursiv. 
Rekursiv bedeutet, daß ein Unterprogramm im Programmablauf sich 
selbst wieder aufruft. Diese Programmiertechnik, die z. B. bei Iterations¬ 
verfahren in höheren Programmiersprachen häufig angewendet wird, 
wird bei Programmen auf Maschinenebene nur recht selten angewendet. 


Die Aufteilung eines Programms in Unterpogramme bringt mehrere 
Vorteile: 

1. Unterprogramme können leichter getestet werden, da sie im Normal¬ 
fall nicht sehr lang sind. 

2. Mit Unterprogrammen können Programm-Bibliotheken aufgebaut 
und sie somit für neue Programme verwendet werden. 

3. Die Programme werden übersichtlicher. 

4. Sie sparen an Speicherplatz. 


Auf einen Nachteil sei auch hingewiesen. Die Befehle JSR und RTS 
benötigen eine 2 bis 3 mal längere Ausführungszeit wie normale Be¬ 
fehle. Für zeitkritische Anwendungen wird man daher lieber eine 
kürzere Ausführungszeit gegen einen höheren Speicherplatzbedarf in 
Kauf nehmen. 


Bei der Verwendung von Unterprogrammen, vor allem, wenn mehrere 
Programmierer an ein- und derselben Aufgabe arbeiten, müssen noch 
zwei Vereinbarungen getroffen werden. 

1. Wie erfolgt die Übergabe von Daten an das Unterprogramm ? 

2. Werden die Registerinhalte im Hauptprogramm oder im Unterpro¬ 
gramm gerettet ? 
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Die Übergabe von Daten in ein Unterprogramm kann auf dreierlei Weise 
erfolgen: 

1. Daten werden über die Register (Akkumulator, X-Register, Y-Re- 
gister) übergeben. 

2. Daten werden im Hauptprogramm im Stapelspeicher abelegt, von 
wo sie aus dem Unterprogramm abgerufen werden. 

3. Die Daten belegen einen festen Speicherbereich, auf den Haupt¬ 
programm und Unterprogramm zugreifen können. 

Welche der 3 Möglichkeiten angewendet wird ist beliebig, sie hängt 
meistens von der Art des Programms ab. 

In Unterprogrammen werden häufig auch die Register benötigt. Soll 
aber der Registerinhalt von Hauptprogramm erhalten bleiben, so muß 
dieser in irgendeiner Form gerettet werden. Hierbei können grundsätz¬ 
lich zwei Konventionen getroffen werden. 

1. Die Registerinhalte werden im Unterprogramm gerettet. 

2. Die Registerinhalte werden im Hauptprogramm gerettet. 

Bei der ersten Methode braucht sich der Programmierer keine Gedanken 
darüber zu machen, ob die Inhalte verändert werden oder nicht. Aller¬ 
dings kann es sein, daß Speicherplatz verschwendet wird, weil die 
Register gerettet werden, obwohl es nicht notwendig war. 

Diese Speicherplatzverschwendung ist bei der zweiten Methode nicht 
gegeben. Hier braucht der Programmierer aber in der Programmbe¬ 
schreibung des Unterprogramms genaue Angaben über die verwendeten 
Register. 

Zum Abschluß des Kapitels über Unterprogramme noch 2 Routinen 
zum Registerinhaltretten und -wiederherstellen und 2 Programmier¬ 
tricks. 

SAVE rettet die Registerinhalte auf dem Stapelspeicher, 

LOAD holt sie von dort wieder zurück. 
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0800 


2 




0800 


3 

****««*#*******«***«*«*«««*« 


0800 


4 

# 

* 


0800 


5 

* SAVE RETTET A,X,Y-REG- 

* 


0800 


6 

* ISTER IM STAPELSPEICHER 

# 


0800 


'7 

« 

# 


0800 


8 

ft*************************** 


0800 


9 




0800 


10 




0800 

48 

11 SAVE PHA 

; <A> —> 

S 

0801 

8A 

12 

TXA 



0802 

48 

13 

PHA 

; <X> —> 

S 

0803 

98 

14 

TYA 



0804 

48 

15 

PHA 

; <Y> —> 

s 

0805 

60 

16 

RTS 



0806 


17 




0806 


18 




0806 


19 

ff***«*«*«*«««***«***«*«**«** 


0806 


20 

* 

* 


0806 


21 

* LOAD LADET DIE REGISTER- 

* 


0806 


22 

* INHALTE WIEDER ZURUECK 

* 


0806 


23 

* 

* 


0806 


24 

*ft*ft**ftft********ft*tft*ft«#«*** 


0806 


25 




0806 


26 




0806 

68 

27 LOAD PLA 



0807 

A8 

28 

TAY 

;<S> —> 

Y 

0808 

68 

29 

PLA 



0809 

AA 

30 

TAX 

; <S> —> 

X 

080A 

68 

31 

PLA 

;<S> —> 

A 

080B 

60 

32 

RTS 



080C 


33 




080C 


34 

i 




35 END 


5.14 Unterprogramme SAVE und LOAD 


Programmiertrick 1: 

Es gibt normalerweise keine Möglichkeit festzustellen welchen Inhalt 
der Befehlsfolgezähler hat. Wie wir aber in Abbildung 5.13 b gesehen 
haben, wird bei einem JSR der augenblickliche Stand des Befehls¬ 
folgezählers in den Stapelspeicher übernommen. Dort bleibt er auch 
nach einem RTS erhalten und kann von dort in die Register über¬ 
nommen werden. Dazu braucht man noch eine Speicherzelle im Moni¬ 
tor, die ein RTS enthält. Dann kann man mit folgenden Programm fest¬ 
stellen, wo sich dieses zur Zeit im Speicher befindet. 


Diese Methode wird zum Beispiel in den Programmen auf den Ein- 
Ausgabeplatinen des APPLE verwendet, um festzustellen, in welchem 
Steckplatz sich diese Platine befindet. 
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** ZERO PAGE VARIABLES: 


ADL 

0010 

ADH 

0011 


0800 


1 

DCM 

"PR/M" 

0800 


2 ADL EPZ 

$10 

0800 


3 ADH EPZ 

$1 1 

0800 


4 



0800 


5 



0800 


6 



0800 


7 

*ft**«ft*******«ft*ft*****ft****ft* 

0800 


8 

* 

* 

0800 


9 

* BEFEHLSFOLGEZAEHLER NACH * 

0800 


10 

* ADL UND 

ADH. * 

0800 


11 

« 

* 

0800 


12 

*******«*********%*********** 

0800 


13 



0800 


14 



0800 

20BDFF 

15 

JSR 

$FFBD ;RTS IM APPLE-MONITOR 

0803 

BA 

16 

TSX 

; S —> X 

0804 

BD0001 

17 

LDA 

$100,X ;<S> —> A 

0807 

851 1 

18 

STA 

ADH 

0809 

CA 

19 

DEX 


080A 

BD0001 

20 

LDA 

$100,X ;<S-1> —> A 

080D 

8510 

21 

°TA 

ADL 

080F 

60 

22 

RTS 




23 

END 



5.15 Befehlsfolgezähler nach ADL und ADH 


Eine andere Anwendung besteht darin, absolute Adressen eines Pro¬ 
gramms so umzurechnen, daß dieses Programm überall im Speicher 
lauffähig ist. Trifft man dazu noch die Konvention, daß ein Programm 
nur auf einer Seite (Adressen S1000, S1100, S1200 usw. bis SFE00) an¬ 
fangen darf, so kann man durch ein Vorprogramm auch längere Pro¬ 
gramme speicherverschieblich (relocatierbar) machen. 


0800 


3 

f 



0800 


4 

t 



0800 


5 

. * 

» 



0800 


6 

•« 

• 

AENDERUNG ABSOLUTER 


0800 


7 

. ff 

i 

ADRESSEN IM PROGRAMM 


0800 


8 

• ff 

t 



0800 


9 

;*< 



0800 


10 

i 



0800 


11 

t 



0800 


12 

t 



0800 

20BDFF 

13 


JSR $FFBD 


0803 

BA 

14 


TSX 


0804 

BD0001 

15 


LDA $100,X 


0807 

8D1008 

16 


STA Ml+2 


080A 

EA 

17 

M 

NOP 


080B 

EA 

18 


NOP 


080C 

EA 

19 


NOP 


080D 

EA 

20 


NOP 


080E 

4C0A08 

21 

Ml 

JMP M 




22 


END 



5.16 Änderung absoluter Adressen durch Programm 






Die absolute Adresse des Sprungbefehls in Speicherzelle $810 wird 
durch das Programm so abgeändert, daß der Programmanfang dieses 
DEMO-Programms auf jeder Seite des Speichers liegen kann. 

Programmiertrick 2: 

Ist der letzte Befehl in einem Unterprogramm vor dem RTS ein JSR 
zu einem anderen Unterprogramm, so kann die Befehlsfolge 

JSR UP 

RTS durch 

JMP UP 

ersetzt werden. Das RTS im Programmteil UP führt im ersten Fall 
auf das RTS nach dem JSR Befehl und von dort zurück ins Haupt¬ 
programm. Im zweiten Fall führt das RTS in UP direkt zurück ins 
Hauptprogramm. Dadurch wird Platz (1 Byte) und Zeit gespart. 


5.6 Struktogramm 

Neben den Flußdiagrammen besteht noch die Möglichkeit,Programm¬ 
abläufe durch ein Struktogramm zu erläutern. Diese Darstellung wollen 
wir für ein Programm zur Umwandlung einer 16-bit Binärzahl ohne Vor¬ 
zeichen in eine 5 stellige Dezimalzahl verwenden. 

Dazu treffen wir folgende Vereinbarungen: 

Die Zellen SIE und S1F enthalten die 16-bit Zahl mit MSB in IE und 
LSB in S1F. Diese beiden Zellen bezeichnen wir mit ACCU 1. Das 5- 
stellige Ergebniss wird in den Zellen S10 bis $12 abgelegt, wobei die 
untersten 4-bit der Zelle $10 die höchste Dezimalstelle enthalten. Diese 
Zellen bezeichnen wir mit ACCU2. 

Die Umsetzung erfolgt dadurch, daß ACCU1 eine Stelle nach links 
geschoben wird und gleichzeitig der Inhalt von ACCU2 verdoppelt 
wird. Diese Verdoppelung geschieht in der Betriebsart Dezimal. Tritt 
beim Linksschieben von ACCU1 ein Übertrag ins Carry-Bit auf, so wird 
der Inhalt von ACCU2 um Eins erhöhet. Diese Schleife wird 16 mal 
durchlaufen. 

(Mathematisches Verfahren: HORNER-Schema) 

Das Verfahren ist in einem Struktogramm in Abbildung 5.17 gezeigt. 

5R 



5.17 Struktogramm für 16-bit Binär-Dezimalwandlung 


Beim Einsprung in das Unterprogramm ist die 16-bit Zahl in ACCU1. 
Zuerst wird ACCU2 auf Null gesetzt, dann folgt eine Schleife mit dem 
X-Register als Zähler. In der Schleife erfolgt das schon angegebene Ver¬ 
fahren zur Umsetzung. Das Programm hierzu zeigt Abbildung 5.18. 


0800 


3 



0800 


4 



0800 


5 



0800 


6 

• 


0800 


7 

» 16 BIT BINAER DEZIMAL- 


0800 


8 

« WANDLUNG. 


0800 


9 

« 


0800 


10 

**tft«ftttf#*'*ftft**ftt«ft**ft****** 

0800 


11 



0800 


12 



0800 


13 



0800 

A900 

14 BINBCD LDA #$00 


0802 

8510 

15 

STA $10 


0804 

8511 

16 

STA $11 


0806 

8512 

17 

STA $12 


0808 

A210 

18 

LDX #$10 


080A 

061F 

19 M ASL $1F 


080C 

26 IE 

20 

ROL $1E 


080E 

F8 

21 

SED 


080F 

A512 

22 

LDA $12 


0811 

6512 

23 

ADC $12 ; 

ADDITION MIT CARRY 

0813 

8512 

24 

STA $12 


0815 

A511 

25 

LDA $11 


0817 

6511 

26 

ADC $11 


0819 

8511 

27 

STA $11 
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081B 

A510 

28 

LDA 

$10 

081D 

6510 

29 

ADC 

$10 

081F 

8510 

30 

STA 

$10 

0821 

D8 

31 

CLD 


0822 

CA 

32 

DEX 


0823 

D0E5 

33 

BNE 

M 

0825 

60 

34 

RTS 


0826 


35 ; 



0826 


36 ; 





37 

END 



5.18 16-bit Biär-Dezimalwandlung 
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Assembler- 

Programmierung 


6. Assembler—Programmierung 

Im letzten Kapitel haben wir die in Assemblersprache geschriebenen 
Programme mit der Papier- und Bleistift Methode in den Maschinen¬ 
code übertragen. Diese Übertragung kann auch durch ein Programm, 
dem Assembler, durchgeführt werden. Folgende Grundelemente muß 
ein Assembler enthalten: 


1. Einen Text-Editor zum Schreiben des Quell-Textes (Source Code). 
Dieser Text-Editor kann entweder Zeilenorientiert oder Bildschirm¬ 
orientiert sein. Zeilenorientiert bedeutet, daß die Anweisungen wie in 
BASIC mit Zeilennummern versehen werden und Änderungen durch 
Angabe der Zeilennummer und eines Editierbefehls (Einfügen, 
Löschen, Ändern) durchgeführt werden. Bildschirmorientiert be¬ 
deutet, daß ein Assemblertext auf dem Bildschirm durch Cursor- 
Bewegungen und Editierbefehle korriegiert und verändert wird. 

2. Im Text müssen für Marken und Sprungziele symbolische Bezeich¬ 
nungen zulässig sein. Die Länge dieser Bezeichnungen sollte mindes¬ 
tens 6 Zeichen betragen. 

3. Nach einer Assemblierung sollte eine Symbol-Tabelle ausgedruckt 
werden, die die Zuordnung zwischen symbolischen Namen und der 
Speicheradresse enthält. So eine Tabelle ist eine große Hilfe bei der 
Fehlersuche in Programmen. 

Folgende Punkte erleichtern die Arbeit des Programmierens, sind aber 
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nicht unbedingt erforderlich: 

1. Programmteile auf Diskette oder Kassette können an beliebigen 
Stellen im Text durch den Editor eingefügt werden. 

2. Tritt in einem Assemblertext eine Befehlsfolge mehrmals auf, so soll 
diese durch einen selbsdefinierten Befehl zu einem MAKRO zu¬ 
sammengefasst werden können. Dieser Name, bestehend aus 3 Buch¬ 
staben (z. B. POP, PUL) wird dann im Text wie ein Assemblerbefehl 
aufgeführt und bei der Übersetzung dann durch die Befehlsfolge 
ersetzt (siehe 8.1 Makro-Assembler des PASCAL-Systems). 


Im übrigen gilt: Je komfortabler der Assembler, desto einfacher die 
Programmentwicklung. 

Bei der Programmierung mit der Papier- und Bleistiftmethode haben wir 
die Anfangsadresse des Programms und diö Adressen von Speicher¬ 
zellen durch einfache Zuordnung festgelegt. Diese Festlegung muß auch 
bei der Übersetzung durch ein Programm getroffen werden. Hierzu 
werden sogenannte Pseudobefehle verwendet. Dies sind Befehle, die der 
Assembler zum Übersetzen des Programms benötigt, die aber im Pro¬ 
grammablauf nicht auftretten. Mit diesen Pseudo-Befehlen wollen wir 
uns zunächst beschäftigen. Leider gibt es Unterschiede in der Schreib¬ 
weise bei den einzelnen 6502 Assemblern. Wir werden diese bei der 
Besprechung der Assembler in Kapitel 8 noch einzeln aufführen. 


6.1 Assembler-Pseudo-Befehle 
1. OBJ 

Schreibweise: OBJ < AUSDRUCK > 

Mit diesem Pseudo-Befehl wird die Anfangsadresse des übersetzten 
Programms (dem Object-Code) festgelegt. Diese Adresse muß nicht 
gleich die Startadresse des Programms sein. Hier wird nur angegeben, 
wohin das übersetzte Programm gespeichert wird. 

Beispiel: OBJ SA00 

Das übersetzte Programm beginnt in Zelle SA00 
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2. ORG 

Schreibweise: ORG ( AUSDRUCK ) 

Mit ORG (Origin) wird die Startadresse des übersetzten Programms 
festgelegt. Auf diese Adresse beziehen sich alle absoluten Adress- 
angaben (Basisadresse). Die Angabe von ORG beinhaltet immer, 
wenn nicht anders angegeben, den Befehl OBJ. 

Beispiel 1: ORG S800 

Basisadresse des übersetzten Programms ist $800, der übersetzte 
Code beginnt ebenfalls mit dieser Adresse. 

Beispiel 2: ORG $800 

OBJ $1000 


Die Basisadresse des übersetzten Programms ist $800. Der Code 
ist allerdings ab Adresse $1000 gespeichert. Soll dieses Programm 
ausgeführt werden, so muß der Code durch einen MOVE-Befehl 
mit dem Monitor an die Adresse $800 umgespeichert werden. 

3. EQU 

Schreibweise: < NAME > EQU < AUSDRUCK > 

Mit EQU (Equate) erfolgt die Zuordnung eines symbolischen 
Namens zu einer Adresse. 

Beispiel: ANFANG EQU $2000 

Der symbolische Name ANFANG entspricht der Adresse $2000. Der 
Assemblerbefehl JSR ANFANG bedeutet damit einen Sprung in ein 
Unterprogramm, daß bei der Adresse $2000 beginnt. Einige 
Assembler unterscheiden bei der EQU Definition ob im < AUS¬ 
DRUCK > eine 1 Byte oder eine 2 Byte Adresse angegeben wird. Bei 
der Angabe von nur 1 Byte ist damit eine Speicherzelle in der Zero- 
Page angewählt. Andere Assembler verlangen für die Zuordnung eines 
symbolischen Namens zu einer Adresse in der Zero-Page einen be¬ 
sonderen Pseudo-Befehl EPZ (Equate Page Zero). 

Schreibweise: < NAME > EPZ < AUSDRUCK >. 

4. ASC 

Schreibweise: ASC < "ZEICHENKETTE" > 

Mit dem Pseudo-Befehl ASC wird die folgende Zeichenkette als 
ASCII-Zeichen gespeichert. Damit wird auf einfache Weise Text, 
den man für eine interaktive Programmierung benötigt in das Pro- 
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gramm eingebaut. 

Besipiel: ASC "NOCH WEITERE EINGABEN (J/N)?" 

5. HEX 

Schreibweise: HEX < HEX-ZEICHEN ) 

Der Pseudo-Befehl HEX speichert Bitmuster ab, die im Programm 
benötigt werden. 

Besipiel: HEX 00AAFF55 

Als Zahlenwerte sind nur die HEX-Zahlen 0 - 9 und A - F erlaubt. 

6. END 

Schreibweise: END 

Dies ist die Anweisung an den Assembler, daß das Programm an 
dieser Stelle zu Ende ist. Ein fehlendes END führt in allen Fällen zu 
einer Fehlermeldung. 

Dies waren einige der Pseudo-Befehle, die als Steueranweisungen für die 
Assembler dienen. 


Auf die Möglichkeit Adressrechnungen durchzuführen, soll noch kurz 
eingegangen werden. 

Durch die EQU Anweisung oder durch eine Marke wird einem sym¬ 
bolischen Namen eine Adresse zugeordnet, z. B. 

NAME EQU S2E 

Im Adressteil eines Assemblerbefehls ist es nun erlaubt, eine Adress¬ 
rechnung durchzuführen. Die Anweisung LDA NAME + 1 

holt den Inhalt der Speicherzelle $2F oder STA NAME — S10 

speichert den Inhalt des Akkumulators nach $1E. 

In den meisten Fällen wird die Addition und Subtraktion für Adress¬ 
rechnungen ausreichen, obwohl einige Assembler auch Multiplikation 
und Division zulassen. 

Eine Anweisung 


LDA NAME + 1 * 3 


wird von links nach rechts entwickelt, also erst NAME + 1 und dann 
dieses Ergebnis mal 3. 


Vorsicht ist mit Adressrechnungen bei Verzweigungen geboten. Die 
Anweisung be q + 2 


bedeutet nicht, daß 2 Assembleranweisungen sondern 2 Speicher¬ 
plätze weitergesprungen wird. Die folgende Befehlsfolge ist falsch: 


LDA 

BEQ 

MARKE LDA 
STA 
DEX 


S1FFF 
MARKE + 2 
$1000 
$1 FFF 


Die Verzweigung BEQ MARKE + 2 führt nicht auf den Assembler¬ 
befehl DEX sondern auf das 2. Adressbyte des Befehls MARKE LDA 
S1000. Richtig lautet dieser Programmteil: 


LDA 

BEQ 

MARKE LDA 
STA 
DEX 


$1 FFF 
MARKE + 6 
$1000 
$1 FFF 


wenn das Programm mit DEX weitergeführt werden soll. 

Ferner ist bei der EQU-Anweisung noch zu beachten, daß dem Namen 
eine Zahl zugewiesen wird, die als Adresse interpretiert wird. Mit der 
Zuordnung 


NAME EQU S2E 

wird mit LDA NAME der Inhalt der Zelle $2E 

mit LDA #NAME die Hexzahl 32E in den Akkumulator 
übernommen. 

Nach den Programmbeispielen in Kapitel 7 werden wir auf die 
wichtigsten 6502 Systeme mit ihren Assemblern eingehen. 
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Noch einige allgemeine Bemerkungen zu Assemblern. 

Führt ein Assembler eine Übersetzung durch, so ist dies im allgemeinen 
mit einem Durchlauf nicht getan. Es werden mehrere Durchläufe 
(PASS) benötigt. Die meisten Assembler benötigen 3 Durchläufe. 

Im ersten Durchgang werden die Befehle entschlüsselt, die effektiven 
Adressen von Marken und Namen bestimmt und in einer Symbol- 
Tabelle angelegt. 

Im zweiten Durchgang werden die symbolischen Namen durch die 
Adressen ersetzt. 

Eine Druckausgabe auf Bildschirm oder Drucker erfolgt dann im 
3. Durchlauf. 

Solche Assembler bezeichnet man auch als 3 PASS ASSEMBLER. 
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Programm¬ 

beispiele 

7. Programmbeispiele 

In diesem Kapitel wollen wir nun einzelne Befehle und Adressierungs¬ 
arten durch Programmbeispiele erläutern. Dafür werden Beispiele ge¬ 
wählt, die in dieser Form sehr oft als Unterprogramme in größeren Pro¬ 
grammen Vorkommen. 


7.1 Zeitschleifen 

Zeit- oder Warteschleifen werden durch Abzählen einer Zahl, die ent¬ 
weder in den Indexregistern oder in einer Speicherzelle abgelegt ist, 
gebildet. 


0800 


2 



0800 


3 



0800 


4 

ft*******«*#**«*#««***«**«**»* 

0800 


5 

* 

« 

0800 


6 

* ZEITSCHLEIFE MIT X-REG. * 

0800 


7 

« 

* 

0800 


8 

##«###*#*#*««#***##*##***#»*# 

0800 


9 



0800 


10 



0800 

A2AA 

11 ZSLX 

LDX #$AA 

0802 

CA 

12 ZSLX1 

DEX 

0803 

D0FD 

13 


BNE ZSLX1 

0805 

60 

14 


RTS 

0806 


15 



0806 


16 



0806 


17 



0806 


18 



0806 


19 

* 

* 

0806 


20 

* ZEITSCHLEIFE MIT X- UND Y-* 

0806 


21 

* REGISTER WERTE WERDEN BEIM* 

0806 


22 

* EINSPRUNG UEBERGEBEN * 

0806 


23 

« 

« 

0806 


24 

#**####***#*##**«##«**«*#*#** 

0806 


25 



0806 


26 



0806 

CA 

2-7 ZSLXY 

DEX 

0807 

D0FD 

28 


BNE ZSLXY 

0809 

88 

29 


DEY 

080A 

D0FA 

30 


BNE ZSLXY 

080C 

60 

31 


RTS 

080D 


32 

9 


080D 


33 

J 
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080D 


34 



080D 


35 


080D 


36 

* 

# 

080D 


37 

* BILDUNG EINER ZEITSCHLEIFE* 

080D 


38 

* DURCH AUFZAEHLEN. * 

080D 


39 

* 

« 

080D 


40 


080D 


41 



080D 


42 



080D 


43 ZI L 

EPZ $10 

080D 


44 ZI H 

EPZ Z1L+1 

080D 


45 ; 

) 


080D 

A900 

46 ZSL 

LDA #$00 

080F 

AA 

47 


TAX 

0810 

A8 

48 


TAY 

0811 

cm i 

49 ZSL1 

CPY ZIH 

0813 

D004 

50 


BNE ZSL2 

0815 

E41 0 

51 


CPX ZIL 

0817 

F007 

52 


BEQ ZSLRTS 

0819 

E8 

53 ZSL2 

INX 

081A 

D0F5 

54 


BNE ZSL1 

081C 

C8 

55 


INY 

0 81D 

18 

56 


CLC 

081E 

90F1 

57 


BCC ZSL1 

0820 

60 

58 ZSLRTS 

RTS 



59 


END 


7.11 

Programme Zeitschleifen 


Im ersten Programm ZSLX wird eine 8-bit Zahl $AA in das X-Register 
übernommen. Von dieser Zahl wird solange Eins abgezogen, bis der 
Inhalt des X-Registers Null ist. 

Im zweiten Programm wird an die beiden Register eine 16-bit Zahl 
vor dem Einsprung in die Schleife übergeben. Dabei enthält das Y- 
Register das MSB und das X-Register das LSB. Diese 16-bit Zahl wird 
solange um Eins erniedrigt, bis der Inhalt beider Register Null ist. 

Im dritten Beispiel wird der Inhalt der beiden Register solange um Eins 
erhöht, bis er gleich einer 16-bit Zahl ist, die in Z1L und ZI H ge¬ 
speichert ist. Das Flußdiagramm dieses Unterprogramms zeigt Ab¬ 
bildung 7.12. Zu diesem Programm ein Hinweis: 

Der Rücksprung zu ZSL1 nach dem Erhöhen des Y-Registers erfolgt 
mit der Befehlsfolge CLC, BCC ZSL1+1. Dies entspricht einem JMP- 
Befehl. Die Verwendung eines JMP-Befehls an dieser Stelle hätte aber 
die Einführung einer absoluten Adresse bedeutet (JMP ZSL1+1), das 
Programm wäre somit nicht mehr speicherverschieblich gewesen. Mit 
der angegebenen Befehlsfolge bleibt dies aber erhalten. 
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7.12 Flußdiagramm Aufzählen 


7.2 Tabellen und Listen 

Die nächsten Programme beziehen sich auf Tabellen und Listen. Folgen¬ 
de Programmteile sollen beschrieben werden. Aufstellen von Tabellen, 
Einfügen, Löschen und Vergleichen von Elementen, Listen sortieren 
und Listen umspeichern. 


7.21 Aufstellen einer unsortierten Liste 

Im Programm ist SAL, SAH die Anfanggsadresse der Liste und EAL, 
EAH die Adresse des zuletzt gespeicherten Eintrags. Die Eingabe von 
Elementen wird durch die Eingabe des Steuerzeichens CTRL—C 
(ETX) beendet. 

Zum Abspeichern des eingegebenen Wertes wird die indirekt indi¬ 
zierte Adressierung verwendet (Zeile 38 in Abbildung 7.21). Der 
Inhalt des Y-Registers ist aber dabei Null, so daß diese Form der 
Adressierung einer indirekten Adressierung entspricht. Der Inhalt 
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von EAL wird nach jedem Abspeichern um Eins erhöht, wobei ein 
Übertrag in EAH berücksichtigt wird. Auf diese Weise lassen sich 
beliebig lange Listen erstellen. 


0804 


4 





0804 


5 





0804 


6 


ftftftftftft«ft**ftftftftftft 

0804 


7 


ft 



0804 


8 


* AUFSTELLEN EIN 

0804 


9 


* HERTEN 

LISTE 

0804 


10 


ft 



0804 


11 


«ftftftftftftftftftftftftftftft 

0804 


12 





0804 


13 





0804 


14 

SAL 

EPZ 

$10 

0804 


15 

SAH 

EPZ 

SAL+1 

0804 


16 

EAL 

EPZ 

SAL+2 

0804 


17 

EAH 

EPZ 

SAL+3 

0804 


18 





0804 


19 





0804 


20 

COUT 

EQU 

$FDED 

0804 


21 

PRTBYT 

EQU 

$FDDA 

0804 


22 

GETCH 

EQU 

$FD35 

0804 


23 

1 

) 



0804 

A9BA 

24 

TABANF 

LDA 


0806 

20EDFD 

25 



JSR 

COUT 

0809 

A900 

26 



LDA 

#$00 

080B 

8510 

27 



STA 

SAL 

080D 

8512 

28 



STA 

EAL 

080F 

A910 

29 



LDA 

#$10 

0811 

8511 

30 



STA 

SAH 

0813 

8513 

31 



STA 

EAH 

0815 

2035FD 

32 

TAB1 

JSR 

GETCH 

0818 

C983 

33 



CMP 

#$83 

081A 

D001 

34 



BNE 

TAB2 

0 81 C 

60 

35 



RTS 


081D 

20EDFD 

36 

TAB2 

JSR 

COUT 

0820 

A000 

37 



LDY 

#$00 

0822 

9112 

38 



STA 

(EAL),' 

0824 

E612 

39 



INC 

EAL 

0826 

D002 

40 



BNE 

TAB 3 

0828 

E613 

41 



INC 

EAH 

082A 

A9A0 

42 

TAB3 

LDA 

#» " 

082C 

20EDFD 

43 



JSR 

COUT 

082F 

18 

44 



CLC 


0830 

90E3 

45 



BCC 

TAB1 


;AUSGABE EINES ASCII ZEICHENS 


; ETX = CTRL-C 


7.21 Aufstellen einer unsortierten Liste 


Für eine kurze Liste (Zahl der Elemente kleiner 256) kann man ein 
Programm nach Abbildung 7.22 verwenden. Hier erfolgt eine einfache 
Indizierung mit dem X-Register, deshalb muß der jeweilige Inhalt von 
X in einer Hilfszelle XREG gespeichert werden. 
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0804 


4 





0804 


5 





0804 


6 


***##***#*##***##*##*#******* 

0804 


7 


ft 


ft 

0804 


8 


* AUFSTELLEN EINER KURZEN 

ft 

0804 


9 


* LISTE 

ft 

0804 


10 


* 


ft 

0804 


11 


»ftftftftftftftftftftftftftftftftftftftftftftftftftftftft 

0804 


12 





0804 


13 





0804 


14 

SAL 

EPZ $10 


0804 


15 

SAH 

EPZ SAL+1 


0804 


16 

XREG 

EPZ SAL+2 


0804 


17 





0804 


18 





0804 


19 

C0UT 

EQU $FDED 

jAUSGABE 

0804 


20 

PRTBYT 

EQU $FDDA 

;AUSGABE 

0804 


21 

GETCH 

EQU $FD35 

;EINGABE 

0804 


22 





0804 

A9BA 

23 

TABANF 

LDA #»:" 


0806 

20EDFD 

24 



JSR C0UT 


0809 

A900 

25 



LDA #$00 


080B 

AA 

26 



TAX 


080C 

8510 

27 



STA SAL 


080E 

A910 

28 



LDA #$10 


0810 

8511 

29 



STA SAH 


0812 

8612 

30 

TAB1 

STX XREG 


0814 

2035FD 

31 



JSR GETCH 


0817 

C983 

32 



CMP #$83 

; ETX = CI 

0819 

D001 

33 



BNE TAB2 


081B 

60 

34 



RTS 


081C 

20EDFD 

35 

TAB2 

JSR C0UT 


081F 

A612 

36 



LDX XREG 


0821 

9510 

37 



STA SAL,X 


0823 

E8 

38 



INX 


0824 

A9A0 

39 

TAB 3 

LDA #" " 


0826 

20EDFD 

40 



JSR COUT 


0829 

18 

41 



CLC 


082A 

90E6 

42 



BCC TAB1 




43 



END 



7.22 Aufstellen einer kurzen Liste 


7.22 Sortieren einer Liste 

Zum Sortieren einer Liste wird das Bubblesort-Verfahren verwendet. 
Dabei wird das erste Element einer Liste mit den folgenden Elementen 
verglichen. Wird ein kleineres Element gefunden, so wird dieses an die 
erste Stelle gesetzt. Der Vergleich wird bis ans Ende der Liste weiter¬ 
geführt. Nach diesem ersten Durchgang ist das oberste Element der 
Liste das kleinste vorkommende Element. Somit kann der 2. Durch¬ 
lauf mit dem Vergleich des zweiten Elementes mit den Folgeelementen 
beginnen. Die Liste ist um einen Eintrag verkürzt worden. Das Ver¬ 
fahren ist beendet wenn die Startadresse (SADR) gleich der Endadresse 
(EADR) ist. Im Flußdiagramm (Abbildung 7.23) bezeichnen weiterhin 
LADR die laufende Adresse, WA den Wert des Elementes am Anfang 
der Liste und WL den Wert des laufenden Elementes. 
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SORT 



7.23 Flußdiagramm BUBBLESORT 


Im Programm BUBBLESORT in Abbildung 7.24 werden für die 
Vergleiche und die Adressrechnungen Unterprogramme verwendet. 
Weiterhin wird in diesem Unterprogramm die Anfangsadresse der Liste 
verändert. Wird diese später noch benötigt, so muß sie außerhalb des 
Programmteils gerettet werden. 


Besondere Beachtung muß man bei solchen Programmen auf die Ver¬ 
gleiche legen. Dabei ist es nicht gleichgültig, an welcher Stelle der 
Laufparameter erhöht wird. Der Vergleich der Elemente muß bis zum 
letzten Element durchgeführt werden. Der Adressvergleich findet am 
Ende der Schleife statt. Das Sortierverfahren ist beendet, wenn das 
vorletzte Element mit dem letzten Element verglichen wurde. Deshalb 
findet der Vergleich SADR = EADR gleich am Anfang dieser Schleife, 
nach dem Erhöhen von SADR statt. 





















***************************** 


* * 

* SORTIEREN EINER LISTE * 

* BUBBLESORT * 

* * 


***************************** 


0800 


2 

0800 


3 

0800 


4 

0800 


5 

0800 


6 

0800 


7 

0800 


8 

0800 


9 

0800 


10 

0800 


11 

0800 


12 

0800 


13 

0800 


14 

0800 


15 

0800 


16 

0800 


17 

0800 


18 

0800 


19 

0800 


20 

0800 

A510 

21 

0802 

8514 

22 

0804 

A51 1 

23 

0806 

8515 

24 

0808 

202B08 

25 

080B 

A000 

26 

080D 

Bl 10 

27 

080F 

Dl 14 

28 

0811 

900A 

29 

0813 

8516 

30 

0815 

Bl 14 

31 

0817 

9110 

32 

0819 

A516 

33 

081B 

9114- 

34 

081D 

203208 

35 

0820 

D0E6 

36 

08 22 

203D08 

37 

0825 

204408 

38 

0828 

D0D6 

39 

082A 

60 

40 

082B 


41 

082B 

E 61 4 

42 

082D 

D002 

43 

082F 

E615 

44 

0831 

60 

45 

0832 


46 

0832 

A515 

47 

0834 

C513 

48 

0836 

D004 

49 

0838 

A514 

50 

083*A 

C512 

51 

083C 

60 

52 

083D 


53 

083D 

E610 

54 

083F 

D002 

55 

0841 

E61 1 

56 

0843 

60 

57 

0844 


58 

0844 

A51 1 

59 

0846 

C 51 3 

60 

0848 

D004 

61 

084A 

A51 0 

62 

084 C 

C512 

63 

084E 

60 

64 

084F 


65 

084F 


66 


67 


SAL 

EPZ 

$10 

SAH 

EPZ 

SAL+1 

EAL 

EPZ 

SAL+2 

EAH 

EPZ 

SAL + 3 

LL 

EPZ 

SAL+4 

LH 

EPZ 

SAL+5 

TEMP 

EPZ 

SAL+6 

SORT 

LDA 

SAL 


STA 

LL 


LDA 

SAH 


STA 

LH 

SORTO 

JSR 

INCRL 

SORT1 

LDY 

#$00 


LDA 

(SAL),Y 


CMP 

(LL),Y 


BCC 

S0RT2 


STA 

TEMP 


LDA 

(LL),Y 


STA 

(SAL) ,Y 


LDA 

TEMP 


STA 

(LL),Y 

S0RT2 

JSR 

VERGL 


BNE 

SORTO 


JSR 

INCRA 


JSR 

VERGA 


BNE 

SORT 


RTS 


INCRL 

INC 

LL 


BNE 

INCRTS 


INC 

LH 

INCRTS 

RTS 


VERGL 

LDA 

LH 


CMP 

EAH 


BNE 

VERTS 


LDA 

LL 


CMP 

EAL 

VERTS 

RTS 


INCRA 

INC 

SAL 


BNE 

INRTS 


INC 

SAH 

INRTS 

RTS 


VERGA 

LDA 

SAH 


CMP 

EAH 


BNE 

VRTS 


LDA 

SAL 


CMP 

EAL 

VRTS 

RTS 


» 

END 



; WA=WL ? 

; VERTAUSCHEN 

;LADR=LADR+1 

; LADR=EADL ? 

; SADR=SADR+1 

; SADR=EADR ? 


7.24 Programm BUBBLESORT 
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7.23 Listen verschieben 

Sehr oft muß man in einem Programm Daten (Listen, Tabellen oder 
auch Programme) im Speicher verschieben. Insbesondere Betriebs¬ 
systeme (Monitore) benötigen solche Verschiebeprogramme. Aber nicht 
alle Programme lassen zu, daß sich die Lage der verschobenen Liste mit 
der Lage der nicht verschobenen Liste überschneidet. Das Programm in 
Abbildung 7.29 "Listen verschieben" lässt dies allerdings zu. Dazu 
benötigt man die Entscheidung ob, das Umspeichern mit dem ersten 
oder letzten Element der Liste beginnen soll. Ist die neue Anfangs¬ 
adresse (NAADR) größer als die alte Anfangsadresse (AADR), so muß 
die Liste mit dem letzten Element beginnend umsortiert werden. Ist die 
neue Anfangsadresse kleiner als die alte, so wird beim ersten Element 
begonnen (Abbildung 7.25). 



7.25 Abbildung Listen verschieben 
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Dazu benötigt man zwei Unterprogramme MOVUP und MOVDWN 
(Abbildung 7.26). 



7.26 Flußdiagramm LISTEN VERSCHIEBEN 


Im Programm sind folgende symbolische Namen eingeführt worden: 

AADR - alte Anfangsadresse 

EADR - alte Endadresse 

NAADR - neue Anfangsadresse 

Durch Anhängen von L oder H wird der niederwertige oder höher¬ 
wertige Adressteil bezeichnet. Diese drei Adressen müssen beim Ein¬ 
sprung bekannt sein. 

Nun einige Erläuterungen zu diesem Programm. 

Im Hauptprogramm findet zuerst ein Vergleich der höherwertigen 
Adressbytes der Anfangsadressen statt. Wenn die alte Anfangsadresse 
kleiner als die neue Anfangsadresse ist, so ist die Bedingung BCC MU 
erfüllt (siehe Abbildung 3.1). 

Sind die Adressen gleich, so müssen noch die niederwertigen Adress- 
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bytes verglichen werden. Mit BCS MD wird dann verzweigt, wenn 
alte Anfangsadresse größer ist, als die neue. 



7.27 Flußdiagramm MOVUP 


Allgemein gilt für Verzweigungen: 

Bedingung: A < M ; Verzweigung mit BCC M 






























Bedingung: A - M ; Verzweigung mit BCC M 

BEQM 

Bedingung: A = M; Verzweigung mit BEQ M 
Bedingung: A - M ; Verzweigung mit BCS M 
Bedingung: A > M ; Verzweigung mit BEQ Ml 

BCS M 


Das Unterprogramm MINUS dekrementiert eine 16-bit Zahl durch 
Subtraktion. Dabei wird gezeigt, wie Daten an ein Unterprogramm 
übergeben werden können. Die Zahl, die dekrementiert werden soll, 
muß vorher in die Hilfszellen SAVE und SAVE+1 gespeichert werden. 



7.28 Flußdiagramm MOVDWN 
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Das Ergebnis kann dann von dort ins Hauptprogramm übernommen 
werden. Dieses Dekrementieren kann auch durch den Dekrement¬ 
befehl erfolgen, wie z. B. in den Zeilen 135 bis 140. Dabei muß man 
aber beachten, daß ein "Borgen" im höherwertigen Datenbyte dann 
erfolgt, wenn der Inhalt des niederwertigen Datenbytes 8FF ist. 
Deshalb der Vergleich mit $FF in Zeile 137. Da ein Vergleich immer 
zwischen Akkumulator und Speicherzelle durchgeführt wird, muß der 
Inhalt von NEADRL vorher dorthin übernommen werden. 

Die Flußdiagramme für die beiden Unterprogramme MOVUP und 
MOVDWN sind in den Abbildungen 7.27 und 7.28 dargestellt. Es zeigt 
sich, wenn man mit einem 8-bit System 16-bit Adressen berechnet daß 
der Aufwand dafür recht erheblich ist. 


0800 


2 







0800 


3 







0800 


4 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXX 


0800 


5 


X 



X 


0800 


6 


* LISTEN VERSCHIEBEN 

X 


0800 


7 


X 



X 


0800 


8 


xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


0800 


9 







0800 


10 







0800 


11 

AADRL 

EPZ 

$10 

; ALTE 

ANFANGSADRESSE 

0800 


12 

AADRH 

EPZ 

$1 1 



0800 


13 

EADRL 

EPZ 

$12 

; ALTE 

ENDADRESSE 

0800 


14 

EADRH 

EPZ 

$13 



0800 


15 

NAADRL 

EPZ 

$14 

; NEUE 

ANFANGSADRESSE 

0800 


16 

NAADRH 

EPZ 

$15 



0800 


17 

ANZL 

EPZ 

$16 

; ANZAHL 

0800 


18 

ANZH 

EPZ 

$17 



0800 


19 

HFZ 

EPZ 

$18 



0800 


20 

SAVE 

EPZ 

$1A 



0800 


21 

NEADRL 

EPZ 

$1C 



0800 


22 

NEADRH 

EPZ 

$ 1D 



0800 


23 


1 





0800 


24 


) 





0800 

A51 1 

25 

MOVE 

LDA 

AADRH 



0802 

C515 

26 



CMP 

NAADRH 



0804 

900D 

27 



BCC 

MU 



0806 

F002 

28 



BEQ 

M 



0808 

B00C 

29 



BCS 

MD 



080 A 

A51 0 

30 

M 

LDA 

AADRL 



080C 

C514 

31 



CMP 

NAADRL 



080E 

9003 

32 



BCC 

MU 



0810 

D004 

33 



BNE 

MD 



0812 

60 

34 



RTS 




0813 

4C9608 

35 

MU 

JMP 

MOVUP 



0816 

4C1908 

36 

MD 

JMP 

MOVDWN 



0819 


37 


f 





0819 


38 


r 





0819 

205608 

39 

MOVDWN 

JSR 

ANZ 



0 81 C 

A514 

40 



LDA 

NAADR-L 



081 E 

8518 

41 



STA 

HFZ 



0820 

A515 

42 



LDA 

NAADRH 



0822 

8519 

43 



STA 

HFZ+1 

; NEUE 

ANFANGADRESSE RETTEN 

0824 


44 







0824 

A000 

45 

M01 

LDY 

#$00 






0826 

Bl 10 

46 


LDA 

(AATRL),Y 

0828 

9114 

47 


STA 

(NAADRL) , Y 

082A 

E610 

48 


INC 

AADRL 

082C 

D002 

49 


BNE 

M02 

082E 

E611 

50 


INC 

AADRH 

0530 

E614 

51 

MO 2 

INC 

NAADRL 

0832 

D002 

52 


BNE 

MO 3 

0834 

E615 

53 


INC 

NAADRH 

0636 


54 

> 



0836 

207F08 

55 

MO 3 

JSR 

ENDE 

0839 

D0E9 

56 


BNE 

M01 

083B 

A51 8 

57 


LDA 

HFZ 

C83D 

8510 

58 


STA 

AADRL 

083F 

A51 9 

59 


LDA 

HFZ + 1 

0841 

8511 

60 


STA 

AADRH 

0843 

A514 

61 


LDA 

NAADRL 

0845 

8512 

62 


STA 

EADRL 

0847 

A515 

63 


LDA 

NAADRH 

0849 

8513 

64 


STA 

EADRH 

084B 

C612 

65 


DEC 

EADRL 

084D 

A512 

66 


LDA 

EADRL 

084F 

C9FF 

67 


CMP 

#$FF 

0851 

D002 

68 


BNE 

MORTS 

0853 

C 61 3 

69 


DEC 

EADRH 

0855 

60 

70 

MORTS 

RTS 


0856 


71 

; 



0856 


72 

> 



0856 

38 

73 

ANZ 

SEC 


0857 

A512 

74 


LDA 

EADRL 

0859 

E510 

75 


SBC 

AADRL 

085B 

8516 

76 


STA 

ANZL 

085D 

A 51 3 

77 


LDA 

EADRH 

085F 

E511 

78 


SBC 

AADRH 

0861 

8517 

79 


STA 

ANZH 

0863 

E616 

80 


INC 

ANZL 

0865 

D002 

81 


BNE 

ANZRTS 

0867 

Eö 17 

82 


INC 

ANZH 

0869 

60 

83 

ANZRTS 

RTS 


086A 


84 

j 



086 A 

A51 A 

85 

MINUS 

LDA 

SAVE 

086C 

38 

86 


SEC 


086D 

E901 

87 


SBC 

#$01 

086F 

851A 

88 


STA 

SAVE 

0871 

A 51 B 

89 


LDA 

SAVE+1 

0873 

E900 

90 


SBC 

#$00 

0875 

851 B 

91 


STA 

SAVE+1 

0877 

60 

92 


RTS 


0878 


93 

» 



0878 

A51B 

94 

ZERO 

LDA 

SAVE+1 

087A 

DO 02 

95 


BNE 

ZRTS 

087C 

A51 A 

96 


LDA 

SAVE 

087E 

60 

97 

ZRTS 

RTS 


087F 


98 

9 



087F 

A51 6 

99 

ENDE 

LDA 

ANZL 

0881 

851A 

100 


STA 

SAVE 

0883 

A517 

101 


LDA 

ANZH 

0885 

851B 

102 


STA 

SAVE+1 

0887 

206A08 

103 


JSR 

MINUS 

088A 

A51A 

104 


LDA 

SAVE 

088C 

8516 

105 


STA 

ANZL 

088E 

A51B 

106 


LDA 

SAVE+1 

0890 

8517 

107 


STA 

ANZH 

0892 

207608 

108 


JSR 

ZERO 

0895 

60 

109 


RTS 


0896 


110 




0896 


1 11 

> 



0896 

20560Ö 

112 

MOV UP 

JSR 

ANZ 

0699 

A516 

113 


LDA 

ANZL 

069B 

851 A 

114 


STA 

SAVE 


; UMSP-;CHERN 

; NEUE ADRESSEN BERECHNEN 


; NAECHSTE ADRESSE BERECHNEN 


; DECREMENT DURCH SUBTRAKTION 




089D 

A517 

115 


LDA 

ANZH 

089F 

851B 

116 


STA 

SAVE+1 

08A1 

206A08 

117 


JSR 

MINUS 

08AM 

A51M 

118 


LDA 

NAADRL 

08A6 

18 

119 


CLC 


08A7 

651A 

120 


ADC 

SAVE 

08A9 

851C 

121 


STA 

NEADRL 

08AB 

8518 

122 


STA 

HFZ 

08AD 

A51B 

123 


LDA 

SAVE+1 

08AF 

6515 

12M 


ADC 

NAADRH 

08B1 

851D 

125 


STA 

NEADRH 

08B3 

8519 

126 


STA 

HFZ+1 

08B5 

A000 

127 

MOV1 

LDY 

#$00 

08B7 

Bl 1 2 

128 


LDA 

(EADRL),Y 

08B9 

91 IC 

129 


STA 

(NEADRL),Y 

08BB 

C612 

130 


DEC 

EADRL 

08BD 

A512 

131 


LDA 

EADRL 

08BF 

C9FF 

132 


CMP 

#$FF 

08C1 

D002 

133 


BNE 

MOV 2 

08C3 

C 613 

13M 


DEC 

EADRH 

08C5 

C61C 

135 

MOV 2 

DEC 

NEADRL 

08C7 

A51C 

136 


LDA 

NEADRL 

08C9 

C9FF 

137 


CMP 

#$FF 

08CB 

D002 

138 


BNE 

MOV 3 

08CD 

C61D 

139 


DEC 

NEADRH 

08CF 

207F08 

1 MO 

MOV3 

JSR 

ENDE 

08D2 

D0E1 

1 Ml 


BNE 

MOV 1 

08DM 


1M2 

| 



08DM 

A51M 

1M3 


LDA 

NAADRL 

08D6 

8510 

1 MM 


STA 

AADRL 

08D8 

A515 

1M 5 


LDA 

NAADRH 

08DA 

8511 

1M6 


STA 

AADRH 

08DC 

A51 8 

1M7 


LDA 

HFZ 

08DE 

8512 

1M8 


STA 

EADRL 

08E0 

A519 

1M 9 


LDA 

HFZ+1 

08E2 

8513 

150 


STA 

EADRH 

08EM 

60 

151 


RTS 


08E5 


152 

9 





153 


END 



7.29 Programm LISTEN VERSCHIEBEN 


0800- A5 

11 

C5 

15 

90 

OD 

FO 

02 

0808- BO 

oc 

A5 

10 

C5 

IM 

90 

03 

0810- DO 

OM 

60 

MC 

96 

08 

MC 

19 

0818- 08 

20 

56 

08 

A5 

IM 

85 

18 

0820- A5 

15 

85 

19 

AO 

00 

Bl 

10 

0828- 91 

IM 

E6 

10 

DO 

02 

E6 

11 

0830- E6 

IM 

DO 

02 

E6 

15 

20 

7F 

0838- 08 

DO 

E9 

A5 

18 

85 

10 

A5 

0890- 19 

85 

11 

A5 

IM 

85 

12 

A5 

0898- 15 

85 

13 

C6 

12 

A5 

12 

C9 

0850- FF 

DO 

02 

C6 

13 

60 

38 

A5 

0858- 12 

E5 

10 

85 

16 

A5 

13 

E5 

0860- 11 

85 

17 

E6 

16 

DO 

02 

E6 

0868- 17 

60 

A5 

1A 

38 

E9 

01 

85 

0870- 1A 

A5 

1B 

E9 

00 

85 

1B 

60 

0878- A5 

1B 

DO 

02 

A5 

1A 

60 

A5 

0880- 16 

85 

1A 

A5 

17 

85 

1B 

20 

0888- 6A 

08 

A5 

1A 

85 

16 

A5 

1B 

0890- 85 

17 

20 

78 

08 

60 

20 

56 

0898- 08 

A5 

16 

85 

1A 

A5 

17 

85 

08A0- 1B 

20 

6A 

08 

A5 

IM 

18 

65 

08A8- 1A 

85 

IC 

85 

18 

A5 

1B 

65 

08B0- 15 

85 

ID 

85 

19 

AO 

00 

Bl 

08B8- 12 

91 

IC 

C6 

12 

A5 

12 

C9 


80 


08C0- FF DO 02 C6 13 C6 IC A5 

08C8- IC C9 FF DO 02 C6 ID 20 

08D0- 7F 08 DO El A5 1« 85 10 

08D8- A5 15 85 11 A5 18 85 12 

08E0- A5 19 85 13 60 

# 

7.210 HEXDUMP LISTEN VERSCHIEBEN 


An dieser Stelle einige Bemerkungen zur Lösung von Programmierauf¬ 
gaben. 

In diesem Beispiel wurde in Abbildung 7.26 ein Flußdiagramm gezeigt, 
daß nur eine Abfrage und zwei Unterprogramme enthält. Diese beiden 
Programmteile wurden dann in den Abbildungen 7.27 und 7.28 weiter 
aufgegliedert. Die dort aufgeführten Programmteile könnten nun in 
weiteren Flußdiagrammen erläutert werden. Auf diese Weise zerlegt 
man eine Aufgabe in immer kleinere Einzelaufgaben. Dieses Vorgehen 
bezeichnet man als "TOP DOWN APPROACH". Beim Programmieren 
geht man nun den umgekehrten Weg: "BOTTOM-UP". Zuerst werden 
die kleinen Teilprobleme in ein Programm umgesetzt und, wenn mög¬ 
lich, gleich getestet. Der nächste Schritt ist dann das Zusammensetzen 
der Teilprogramme zu größeren Einheiten, wobei diese auch sofort 
durch Testläufe auf Fehler überprüft werden sollen. Der letzte Schritt 
ist dann der Zusammenbau des fertigen Programms. Dieses Vorgehen 
zwingt einen aber auch dazu, Programm-Module zu entwickeln. Dies 
sind in sich abgeschlossene Programmteile mit definierten Schnitt¬ 
stellen. Ein guter Programmierer wird sich eine Bibliothek solcher 
Module zusammenstellen, auf die er bei neuen Programmen zurück¬ 
greifen kann. Damit wird Zeit und Programmierarbeit gespart. Selbst 
wenn man so ein Programm-Modul nicht direkt einsetzen kann, so hat 
man doch eine Vorlage für die Neuprogrammierung. 


7.24 Aufstellen einer sortierten Liste 

Mit den folgenden Unterpogrammen kann eine Tabelle oder eine Liste 
erstellt werden, bei der die Elemente schon bei der Eingabe an die 
richtige Stelle einsortiert werden. Die Zahl der Elemente ist auf 256 
beschränkt. Dadurch kann in den Programmteilen die indiziert in¬ 
direkte Adressierung verwendet werden. Die Basisadresse der Tabelle 
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ist in den Zellen ANFL und ANFH gespeichert, Zelle L enthält die 
augenblickliche Länge der Tabelle, während die Zelle E den neu einzu¬ 
fügenden Wert enthält. 



7.211 Flußdiagramm Aufstellen einer sortieren Liste 


Das Flußdiagramm zeigt Abbildung 7.211. Das Programm beginnt mit 
der Abfrage, ob die Liste leer ist. Dann wird das Element einfach in die 
Liste geschrieben. Mit den beiden nächsten Abfragen wird festgestellt. 
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ob das Element kleiner als das Anfangselement oder größer als das 
letzte Element ist. Im zweiten Fall kann das Element gleich eingefügt 
werden, im ersten Fall muß die Liste erst um ein Element nach oben 
verschoben werden. 



7.212 Flußdiagramm PLASU 
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7.213 Flußdiagramm EINSRT 
























Trifft dies alles nicht zu, so muß zuerst der richtige Platz für das Ele¬ 
ment gefunden werden (PLASU) und dann einsortiert werden. Dabei 
werden alle Elemente, die größer sind,um eine Stelle nach oben ver¬ 
schoben und somit Platz für das neue Element geschaffen. Die Fluß¬ 
diagramme für PLASU und EINSRT zeigen die Abbildungen 7.212 und 
7.213. 

Im Programmteil PLASU wird ein binäres Suchverfahren angewendet. 
Die Liste wird halbiert und das neue Element mit dem Element in der 
Mitte der Liste verglichen. Je nachdem, ob es größer oder kleiner als 
dieses ist, wird auf die gleiche Weise, wiederum durch halbieren ent¬ 
weder in der unteren oder oberen Hälfte weitergesucht, solange bis 
keine Halbierungen mehr möglich sind. Damit ist der Platz des neuen 
Elementes gefunden. Dieses Verfahren wurde aus einem in BASIC 
geschriebenen Programmteil in Assembler übersetzt. Dieses Programm 
ist in Abbildung 7.214 aufgelistet und die entsprechenden Zeilen in 
das Programm 7.215 als Kommentar eingefügt. 


1050 J1=0 : J2=L 
1060 J = INT((J1+J2)/2) 

1090 IF ES <WS(J) THEN J2=J : GOTO 1110 
1100 J1 =J 

1110 IF J <> INT((J1+J2)/2) THEN 1060 
1120 RETURN 


7.214 BASIC-Programm PLASU 


0800 

2 




0800 

3 




0800 

4 


***************************** 

0800 

5 


* 

* 

0800 

6 


* AUFSTELLEN EEINER SOR- * 

0800 

7 


* TIERTEN LISTE * 

0800 

8 


# 

« 

0800 

9 


***************************** 

0800 

10 




0800 

1 1 




0800 

12 

ANFL 

EPZ $10 

0800 

13 

ANFH 

EPZ $11 

0800 

14 

L 

EPZ $12 

0800 

15 

J 

EPZ $14 

0800 

16 

J1 

EPZ $15 

0800 

17 

J2 

EPZ $16 

0800 

18 

17 

EPZ $17 


85 



0800 


19 





0800 


20 





0800 


21 





08Q0 

A512 

22 LISTE 

LDA 

L 


0802 

D00A 

23 


BNE 

LISI 


0804 

AOOO 

24 


LDY 

#$00 

; LISTE LEER ? 

0806 

A517 

25 


LDA 

E 


0808 

9110 

26 


STA 

(ANFL),Y 


080A 

E612 

27 


INC 

L 


080C 

D01F 

28 


BNE 

LISRTS 


080E 


29 





080E 

AOOO 

30 LISI 

LDY 

#$00 


0810 

A517 

31 


LDA 

E 

; EINZUFUEGENDES ELEMENT 

0812 

Dl 1 0 

32 


CMP 

(ANFL),Y 

jKLEINER ALS ANFANGS- 

0814 

B009 

33 


BCS 

LIS2 

;ELEMENT 

0816 

88 

34 


DEY 



0817 

8414 

35 


STY 

J 


0819 

205E08 

36 


JSR 

EINSRT 


081C 

18 

37 


CLC 



081D 

900E 

38 


BCC 

LISRTS 


081F 

A41 2 

39 LIS2 

LDY 

L 


0821 

88 

40 


DEY 



0822 

A517 

41 


LDA 

E 


0824 

Dl 1 0 

42 


CMP 

(ANFL) ,Y 

;EINZUFUEGENDES ELEMENT 

0826 

9006 

^3 


BCC 

LIS3 

jGROESSER ALS LETZTES ELEMENT 

0828 

C8 

44 


INY 


0829 

9110 

45 


STA 

(ANFL),Y 


082B 

E612 

46 


INC 

L 


082D 

60 

47 LISRTS 

RTS 



082E 

203408 

48 LIS3 

JSR 

PLASU 


0831 

4C5E08 

49 


JMP 

EINSRT 


0834 


50 





0834 


51 





0834 


52 





0834 


53 

» 



ft 

0834 


54 

• PLATZ SUCHEN 

ft 

0834 


55 

« 



« 

0834 


56 





0834 


57 





0834 


58 





0834 

A512 

59 PLASU 

LDA 

L 

; J1=0:J2=L 

0836 

8516 

60 


STA 

J2 


0838 

A900 

61 


LDA 

#$00 


083A 

8515 

62 


STA 

J1 


083C 

18 

63 


CLC 


; J=INT((J1+J2)/2) 

083D 

6516 

64 


ADC 

J 2 


083F 

4 A 

65 


LSR 



0840 

85.14 

66 


STA 

J 


0842 

A41 4 

67 S1 

LDY 

J 

; IF E<W(J) THEN S2 

0844 

A517 

68 


LDA 

E 


0846 

Dl 10 

69 


CMP 

(ANFL),Y 


0848 

9005 

70 


BCC 

S2 


084 A 

8415 

71 


STY 

J1 

; ELSE J1=J 

084C 

18 

72 


CLC 



084D 

9002 

73 


BCC 

S3 

; GOTO S3 

084F 

8416 

74 S2 

STY 

J 2 

; J 2=J 

0851 

A515 

75 S3 

LDA 

J1 

; IF J <> INT((J1+J2)/2) 

0853 

18 

76 


CLC 



0854 

6516 

77 


ADC 

J2 


0856 

4 A 

78 


LSR 



0857 

8514 

79 


STA 

J 


0859 

C414 

80 


CPY 

J 


085B 

D0E5 

81 


BNE 

S1 

; THEN S1 

085D 

60 

82 


RTS 




86 






085E 


83 


085E 


84 


085E 


85 


085E 


86 

* 

085E 


. 87 

* EINSORTIEREN 

085E 


88 

* 

085E 


89 

##**#*##**#***#### 

085E 


90 


085E 


91 


085E 

E614 

92 EINSRT INC J 

0860 

A41 2 

93 

LDY L 

0862 

88 

94 SRT1 DEY 

0863 

Bl 1 0 

95 

LDA (ANFL),Y 

0865 

C8 

96 

INY 

0866 

9110 

97 

STA (ANFL),Y 

0868 

88 

98 

DEY 

0869 

C414 

99 

CPY J 

086B 

D0F5 

100 

BNE SRT1 

086D 

A517 

101 

LDA E 

086F 

9110 

102 

STA (ANFL),Y 

0871 

E612 

103 

INC L 

0873 

60 

104 

RTS 

0874 


105 ; 




106 

END 



7.215 Programm LISTE 


Alle Programme in diesem Teil sind nur für Listen mit 1 Byte langen 
Elementen aufgestellt worden. Durch entsprechende Unterprogramme 
lassen sich die Programme zur Handhabung von beliebig langen Listen¬ 
elementen erweitern. 


7.3 MENUE-Programme 

Bei kurzen Maschinenprogrammen oder wenn diese Teil eines in einer 
höheren Programmiersprache geschriebenen Programms sind, wird man 
ohne MENUE-Technik auskommen. Diese ist aber unbedingt notwendig 
wenn vom Programm Eingaben über das Tastenfeld verlangt werden. 
In diesem Fall sollte man "interaktiv" programmieren. Das heißt, der 
Rechner gibt Anweisungen aus, welche Eingaben an dieser Stelle im 
Programm erwartet werden. Diese Anweisungen müssen erklärend 
sein, und nicht nur durch Ausgeben eines Zeichens erfolgen. Die Kosten 
für Speicherplatz sind so gering, daß man ruhig ein ganzes Wort oder 
einen Satz als Frage ausgeben kann. Für die in Kapitel 7.2 aufgestellten 
Programme wird als Beispiel ein Menue der folgenden Form angegeben: 


T(ABELLE AUFSTELLEN 
S(ORTIEREN 


87 



EONFUEGEN 

B(EENDEN 

EINGABE: 

Für dieses Programm benötigen wir ein Unterprogramm Textaus zur 
Ausgabe von Text auf den Bildschirm und einen Verteiler. 

Für die Ausgabe von Text auf den Bildschirm gibt es zwei Möglich¬ 
keiten. 


Der Text ist fortlaufend im Rechner gespeichert. Als letztes Zeichen 
des Textes ist ein Sonderzeichen vereinbart, das, wenn es vom Pro¬ 
gramm Textaus gelesen wird, zum Abbruch der Ausgabe führt. Die 
zweite Möglichkeit besteht darin, im ersten Byte des Textspeichers 
durch eine Zahl die Länge des Textes anzugeben, und die einzelnen 
Zeichen bei der Ausgabe mitzuzählen. Für unser Programm TXTAUS 
wollen wir die erste Methode wählen. Als Textendezeichen wird S00 
gewählt (Abbildung 7.31). 

L 

1 TXTAUS LDA TEXT.X 

2 BEQ TXTRTS 

3 JSR COUT 

4 INX 

5 CLC 

6 BCC TXTAUS 

7 TXTRTS RTS 

8 ; 

9 TEXT ASC "T(ABELLE AUFSTELLEN" 


10 

HEX 

8D 

11 

ASC 

«S(ORTIEREN« 

12 

HEX 

8D 

13 

ASC 

«E(INFUEGEN« 

14 

HEX 

8D 

15 

ASC 

«B(EENDEN« 

16 

HEX 

8D8D 

17 

ASC 

«EINGABE: « 

18 

HEX 

00 

19 ; 




7.31 Unterprogramm TXTAUS 


Das HEX-Zeichen 8D bedeutet Wagenrücklauf (RETURN) und gleich¬ 
zeitig Zeilenvorschub. In dem eingegebenen Text kann das RETURN- 
Zeichen nicht eingegeben werden, da dieses Zeichen als Zeilenende vom 
Texteditor des Assemblers interpretiert wird. 
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Der Verteiler besteht in einer Kette von Abfragen (Abbildung 7.32). 
Auf alle Fälle sollte man sich gegen Fehlbedienungen schützen. Trifft 
keine der Abfragen zu, so wird das Zeichen 887 (BELL) ausgegeben 
und auf die Eingaberoutinen zurückgesprungen. Das vollständige 
Menueprogramm ist in Abbildung 7.32 aufgeführt. In diesem Pro¬ 
gramm wird ein Monitorprogramm HOME verwendet, das den Bild¬ 
schirm löscht und den Cursor in die linke obere Ecke des Bildschirms 
setzt. 



7.32 Flußdiagramm MENUE 
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7.31 Eingabe einer Dezimalzahl mit Umwandlung in Hexadezimalzahl 

Bei der Eingabe in den Menueprogrammen wird oft die Eingabe eines 
Zahlenwertes verlangt. Diese Eingabe soll in dezimaler Form geschehen 
und vom Programm in die interne Bitdarstellung umgewandelt werden. 


0800 


2 









0800 


3 









0800 


4 


«****«*«*««***«*«*****««*«*** 




0800 


5 


# 



ft 




0800 


6 


* 

MENUPROGRAMM 

ft 




0800 


7 





ft 




0800 


8 


ftftftftftftftftftff«««ft«ftftft««ft«ftftftftftftft 




0800 


9 









0800 


10 









0800 


11 

COUT 

EQU 

$FDED 

;AUSGABE 

EINES 

ASCII 

ZEICHENS 

0800 


12 

RDCHAR 

EQU 

$FD35 

:EINGABE 

EINES 

ASCII 

ZEICHENS 

0800 


13 

HOME 

EQU 

$FC58 

:BILDSCHIRM LOESCHEN 


0800 


14 

M0NIT0 

EQU 

$FF59 





0800 


15 









0800 


16 









0800 


17 

SORT 

EQU 

$880 





0800 


18 

EINF 

EQU 

$900 





0800 


19 

TABANF 

EQU 

$980 





0800 


20 









0800 


21 



ORG 

$800 





0800 


22 









0800 

2058FC 

23 



JSR 

HOME 





0803 

A200 

24 



LDX 

//$00 





0805 

203808 

25 



JSR 

TXTAU. 





0808 

2035FD 

26 

MENU 1 

JSR 

RDCHAF 





080B 

C9D4 

27 



CMP 

#"T" 





080D 

D006 

28 



BNE 

MENU2 





080F 

208009 

29 



JSR 

TABANF 





0812 

18 

30 



CLC 






0813 

90F3 

31 



BCC 

MENU1 





0815 

C9D3 

32 

MENU2 

CMP 

#"S" 





0817 

D006 

33 



BNE 

MENU3 





0819 

208008 

34 



JSR 

SORT 





081C 

18 

35 



CLC 






081D 

90E9 

36 



BCC 

MENU1 





081F 

C9C5 

37 

MENU3 

CMP 

#"E" 





0821 

D006 

38 



BNE 

MENU4 





0823 

200009 

39 



JSR 

EINF 





0826 

18 

40 



CLC 






0827 

90DF 

41 



BCC 

MENU1 





0829 

C9C2 

42 

MENU4 

CMP 

#"B" 





082B 

D003 

43 



BNE 

MENU5 





082D 

4C59FF 

44 



JMP 

MONITO 





0830 

A987 

45 

MENU5 

LDA 

#$87 





0832 

20EDFD 

46 



JSR 

COUT 





0835 

18 * 

47 



CLC 






0836 

90D0 

48 



BCC 

MENU 1 





0838 


49 

i 

» 







0838 


50 









0838 

BD4508 

51 

TXTAUS 

LDA 

TEXT,X 





083B 

F007 

52 



BEQ 

TXTRTS 





083D 

20EDFD 

53 



JSR 

COUT 





0840 

E8 

54 



INX 






0841 

18 

55 



CLC 






0842 

90F4 

56 



BCC 

TXTAUS 





0844 

60 

57 

TXTRTS* 

RTS 






0845 


58 









0845 

D4A8C1 

59 

TEXT 

ASC 

"T(ABELLE 

AUFSTELLEN'' 




0848 

C2C5CC 












08MB CCC5A0 
084E C1D5C6 
0851 D3D4C5 
0854 CCCCC5 
0857 CE 

0858 8D 60 

0859 D3A8CF 61 

085C D2D4C9 
085F C5D2C5 
0862 CE 

0863 8D 62 

0864 C5A8C9 63 

0867 CEC6D5 
086A C5C7C5 
086D CE 

086E 8D 64 

086F C2A8C5 65 

0872 C5CEC4 
0875 C5CE 
0877 8D8D 66 

0879 C5C9CE 67 

087C C7C1C2 
087F C5BAA0 
0882 00 
0883 


HEX 8D 

ASC ''S(ORTIEREN'' 


HEX 8D 

ASC ”E(INFUEGEN» 


HEX 8D 

ASC »B(EENDEN» 


HEX 8D8D 

ASC »EINGABE: » 


68 HEX 00 

69 ; 

70 END 


7.33 MENUEPROGRAMM 


Dafür benötigen wir zwei Unterprogramme DIGIT und MULTEN. Im 
Programmteil DIGIT wird das eingegebene ASCII-Zeichen daraufhin 
untersucht, ob es eine Dezimalzahl darstellt. Trifft dies zu, so wird 
durch Ausblenden der vorderen vier Bit das ASCII-Zeichen in eine 
Binärzahl umgewandelt. 


Die Zahl 1 wird durch ASCII S31 (APPLE = SB1) dargestellt. Durch 
Ausblenden mit der UND-Funktion und dem Bitmuster % 00001111 
(= S0F) wird aus dem Zeichen S31 das Zeichen SOI. Diese Zahl wird 
in der Hilfszelle INZ gespeichert und der Akkumulatorinhalt auf Null 
gesetzt. Ist das eingegebene Zeichen keine Dezimalzahl zwischen 0 
und 9, so wird das Unterprogramm mit dem Zeichen im Akkumulator 
verlassen. 


Die Eingabe geschieht dann in folgender Weise. Der Inhalt der beiden 
Zellen AL und AH wird zu Null gesetzt und die erste Zahl aus INZ da¬ 
zuaddiert. Bevor nun die zweite Zahl zum Inhalt von AL und AH 
addiert wird, muß dieser mit dem Faktor 10 multipliziert werden. 
Dies geschieht im Programmteil MULTEN. Die Eingabeschleife wird 
verlassen wenn ein ASCII-Zeichen eingegeben wird, das keine Dezimal¬ 
zahl darstellt. 
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Der Befehlsvorrat des 6502 kennt keinen Multiplikationsbefehl. Eine 
Multiplikation muß also durch Software ausgeführt werden. Die Multi¬ 
plikation mit 10 lässt sich auf folgende Weise sehr leicht durchführen. 
Schiebt man den Inhalt einer Speicherzelle einmal nach links, so be¬ 
deutet dies eine Multiplikation mit 2 (Abbildung 7.34). 


0 

0 

0 

0 

0 

1 

1 

0 



0 

0 

0 

0 

1 

1 

0 

0 


7.34 Multiplikation mit 2 


Die Umkehrung davon, nämlich eine Stelle rechts schieben, bedeutet 
dann eine Division durch 2. 

Der Speicherinhalt wird in einer Hilfszelle zwischengespeichert. Dann 
wird 2 mal linksgeschoben, dies entspricht einer Multiplikation mit 4. 
Der Inhalt der Hilfszelle wird dazuaddiert. Das entspricht einer Multi¬ 
plikation mit 5. Die Multiplikation mit 10 wird dann durch ein noch¬ 
maliges linksschieben erreicht. 

Im Programm MULTEN wird dieses Verfahren auf eine 16-bit Zahl 
angewendet. Das vollständige Programm zeigt Abbildung 7.35 


0800 


2 




0800 


3 




0800 


4 


***************************** 

0800 


5 


* 

* 

0800 


6 


* DEZIMALE ZAHLENEINGABE UND* 

0800 


7 


* UMWANDLUNG IN BINAERZAHL * 

0800 


8 


* 

* 

0800 


9 


***************************** 

0800 


10 




0800 


11 




0800 


12 

AL 

EPZ $10 

0800 


13 

AH 

EPZ AL+1 

0800 


14 

HL 

EPZ AL+2 

0800 


15 

HH 

EPZ AL+3 

0800 


16 

INZ 

EPZ AL+4 

0800 


17 


1 


0800 


18 

RDCHAR 

EQU $FD?5 

0800 


19 

COUT 

EQU $FDED 

0800 


20 

PRTBYT 

EQU $FDDA ; AUSGABE EINES BYTES 

0800 


21 




0800 


22 



0RG $800 

0800 

A900 

23 

ZEIN 

LDA #$00 

0802 

8510 

24 



STA AL 

080^ 

8511 

25 



STA AH 

0806 

201508 

26 

ZEIN1 

JSR INCHAR 
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0809 

D006 

27 


BNE 

ZEIN2 


080B 

203208 

28 


JSR 

MULTEN 


080E 

18 

29 


CLC 



080F 

90F5 

30 


BCC 

ZEIN 1 


0811 

205F08 

31 

ZEIN2 

JSR 

OUT 


0814 

60 

32 


RTS 



0815 


33 

9 




0815 


34 

9 




0815 

2035FD 

35 

INCHAR 

JSR 

RDCHAR 


0818 

8514 

36 


STA 

INZ 


081A 

20EDFD 

37 


JSR 

COUT 


081D 

A514 

38 


LDA 

INZ 


081F 

202308 

39 


JSR 

DIGIT 


0822 

60 

40 


RTS 



0823 


41 

j 




0823 


42 

j 




0823 

C9B0 

43 

DIGIT 

CMP 

#"0" 


0825 

900A 

44 


BCC 

DIRTS 


0827 

C9C1 

45 


CMP 

#"A" 


0829 

B006 

46 


BCS 

DIRTS 


082B 

290F 

47 


AND 

#1600001111 


082D 

8514 

48 


STA 

INZ 


082F 

A900 

49 


LDA 

//$00 


0831 

60 

50 

DIRTS 

RTS 



0832 


51 

9 




0832 


52 

9 




0832 

A510 

53 

MULTEN 

LDA 

AL 


0834 

8512 

54 


STA 

HL 


0836 

A511 

55 


LDA 

AH 


0838 

8513 

56 


STA 

HH 


083A 

0610 

57 


ASL 

AL 


083C 

2611 

58 


ROL 

AH 

; MAL 2 

083E 

0610 

59 


ASL 

AL 


0840 

2611 

60 


ROL 

AH 

; MAL 2 

0842 

18 

61 


CLC 



0843 

A510 

62 


LDA 

AL 


0845 

6512 

63 


ADC 

HL 


0847 

8510 

64 


STA 

AL 


0849 

A511 

65 


LDA 

AH 


084B 

6513 

66 


ADC 

HH 


084D 

8511 

67 


STA 

AH 

; PLUS 

084F 

0610 

68 


ASL 

AL 


0851 

2611 

69 


ROL 

AH 

; MAL 2 

0853 

18 

70 


CLC 


; PLUS INZ 

0854 

A510 

71 


LDA 

AL 


0856 

6514 

72 


ADC 

INZ 


0858 

8510 

73 


STA 

AL 


085A 

9002 

74 


BCC 

MULRTS 


085C 

E611 

75 


INC 

AH 


085E 

60 

76 

MULRTS 

RTS 



085F 


77 

9 




085F 


78 

9 




085F 

A9A0 

79 

OUT 

LDA 

V" " 


0861 

20EDFD 

80 


JSR 

COUT 


0864 

A51 1 

81 


LDA 

AH 


0866 

20DAFD 

82 


JSR 

PRTBYT 


0869 

A510 

83 


LDA 

AL 


086B 

20DAFD 

84 


JSR 

PRTBYT 


086E 

60 

85 


RTS 



086F 


86 

; 




086F 


87 

; 





88 END 


7.35 Dezimale Zahleneingabe 
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7.32 Texteingabe in einen Textpuffer 

Das folgende Programm TEXT ist ein Beispiel für Texteingabe. In den 
Rechner wird ein Text zeilenweise eingegeben. Jede Zeile kann, bevor 
sie in den Textspeicher übernommen wird, korrigiert werden. Dazu 
werden 5 Sonderzeichen vereinbart: 


S08 ($88) 
$15 ($95) 
CTRL-A SOI (S81) 

CTRL-L SOC (S8C) 

CTRL-E S05(S85) 


Cursor nach links ohne Löschen 
Cursor nach rechts ohne Löschen 
Cursor nach links mit Löschen 
Ein Zeichen löschen, bei der augenblick¬ 
lichen Cursorposition 
Ein Zeichen einfügen, bei der augenblick¬ 
lichen Cursorposition. 


Bei Betätigen der Return-Taste wird der Text vom Zeilenanfang bis zur 
Curosrposition übertragen. Die Zeilenlänge des Textes soll (im Pro¬ 
grammbeispiel) 40 Zeichen nicht überschreiten, eine Endeabfrage 
erfolgt aber nicht. 


Rechner, die über einen Video- oder Fernsehausgang an einen Fernseher 
angeschlossen werden können, benutzen einen Teil des Speicherbe¬ 
reiches als Bildspeicher. Zeichen, die in diesen Bereich geschrieben 
werden, werden über einen Zeichengenerator in eine Impulsfolge für 

den Fernseher umgesetzt. Speichert man dort ein ASCil-Zeichen ab, so 

wird es auf dem Bildschirm ausgegeben. 

Beim APPLE-I I-Rechner liegt dieser Bereich bei den Adressen $400— 
$800. Eine Zeile dieses Bildspeichers wollen wir als Eingabezeile ver¬ 
wenden. Die Anfangsadresse ist $600, die Endadresse bei $623. 


Das Programm ist in Abbildung 7.26 gezeigt. Benötigt werden vom 
Hauptprogramm lediglich die Eingaberoutine RDCHAR,die Festlegung 
der Bildspeicheradresse und die Festlegung des Textpuffers TEXTBU. 
Das Unterprogramm HOME (Bildschirm löschen) kann durch ein 
Maschinenprogramm ersetzt werden, das den Bildspeicher mit Blanks 
(ASCII $20, APPLE $A0) vollschreibt. 

In den Zeilen 28 bis 73 ist ein Verteiler ähnlich dem im Menuepro- 
gramm aufgebaut. Der Rücksprung zu Adresse TEXT oder TEX0 erfolgt 


mit dem Befehl BCC <MARKE> . Um an dieser Stelle etwas Platz zu 
sparen wird vorausgesetzt, daß im Unterprogramm vor dem RTS ein 
CLC ausgeführt wird. 

Zusätzlich zu den schon angegebenen Abfragen werden noch zwei 
weitere eingeführt. Mit RETURN wird der Text bis zur augenblick¬ 
lichen Cursorposition in einen Textspeicher geschrieben und die Zeile 
gelöscht, mit CTRL-C wird das Programm abgebrochen. 

In den Unterprogrammen werden zwei Zeiger benutzt. Der Zeiger L 
zeigt auf die augenblickliche Cursorstellung, der Zeiger Z auf das Ende 
der Textzeile. 

Bei Eingabe eines Zeichens wird dieses auf den Bildschirm ausgegeben 
und der Cursor (—) eine Stelle rechts geschoben. 

Im Unterprogramm LINKS wird bei Eingabe des Codes S88 der augen¬ 
blickliche Cursor eine Stelle nach links geschoben. Um dies sichtbar zu 
machen wird das Zeichen invers dargestellt. Dies geschieht beim APPLE 
durch Nullsetzen der beiden höchsten Bit (AND mit % 0 0 1 1 1 1 1 1). 
Umgekehrt wird im Unterprogramm RECHTS durch das Zeichen S95 
der laufende Cursor eine Stelle nach rechts geschoben. Dabei wird über 
die ODER-Funktion (ORA mit % 1 1 0 0 0 0 0 0) die beiden höchsten 
Bit wieder auf Eins gesetzt und das Zeichen wieder normal ausgegeben. 


Bei Eingabe des Codes S8C (CTRL-A) wird das letzte Zeichen gelöscht 
und der Endzeiger eine Stelle nach links geschoben (Programmteil 
LOE1). Das Löschen eines Zeichens innerhalb des Textes geschieht im 
Programmteil LOE2. Durch Eingabe von CTRL-L ($8C) wird das 
Zeichen bei der augenblicklichen Cursorposition gelöscht und der 
rechts davon stehende Text eine Stelle nach links verschoben. 

Schließlich wird im Programmteil EINF durch das Zeichen S85 
(CTRL-E) der augenblickliche Platz zum Einfügen von Zeichen ge¬ 
schaffen. 


In diesem Unterprogramm bedarf die Befehlsfolge in den Zeilen 141 
bis 146 noch einer Erläuterung. 
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Beim Verschieben des Textes wird in Zeile 142 verglichen, ob der 
augenblickliche Cursorstand schon erreicht ist. Ist dies nicht der Fall 
so muß vor dem Rücksprung das Y-Register noch einmal um Eins 
erniedrigt werden. Damit wird aber der Inhalt des Statusregisters ver¬ 
ändert und somit die Bedingung für die Verzweigung BEQ EINF1 
in Zeile 146. Abhilfe wird dadurch geschaffen, daß der Inhalt des 
Statusregisters vor dem DEY auf den Stapelspeicher geschrieben wird 
und nachher vor der Sprungbedingung wieder von dort geholt wird. 
Das letzte Unterprogramm SPCHRN schreibt den Text von Anfang 
der Zeile bis zur augenblicklichen Cursorposition. 

Die Erweiterung dieses Zeileneditors zu einem zeilenorientierten Text¬ 
editor sei dem Leser als Programmierübung überlassen. Die Zeilen 
müssen durch Zeilennummern gekennzeichnet und im Textspeicher ab¬ 
gelegt werden. Durch Befehle wie LIST oder NLIST kann dieser Text¬ 
speicher auf den Bildschirm gebracht werden, wobei mit NLIST z. B. 
keine Zeilennummern ausgegeben werden. Für das Einfügen und 
Löschen von Zeilen können die Programme in 7.2 als Beispiele dienen. 


0800 

2 





0800 

3 





0800 

4 





0800 

5 


!• 


• 

0800 

6 


• TEXTVERARBEITUNG 

• 

0800 

7 


• 


• 

0800 

8 





0800 

9 





0800 

10 





0800 

11 

AHFL 

EPZ >10 


0800 

12 

1 


EPZ >12 


0800 

13 

1 


EPZ >13 


0800 

1« 

Z 

EPZ >14 


0800 

15 





0800 

16 





0800 

17 

HOME 

EQU >FC58 

; BILDSCHIRM LOESCHEN 

0800 

18 

M0NIT0 

E0U >FF59 

;RUECKSPR’JNG MONITOR 

0800 

19 

CRLF 

EQU >FD6E 

{AUSGABE VON CRLF 

0800 

20 

RDCHAR 

EQU >FD35 

;ASCII ZEICHEN LESEN 

0800 

21 

BSPL 

EQU >00 


0800 

22 

BSPH 

EQU >06 

{ADRESSE BILDZEILE 

0800 

23 

TEXTBU 

EQU >1000 


0800 

24 





0800 

25 





0800 

26 





0800 

27 





0800 2058FC 

28 

TEXT 

JSR HOME 


0803 A000 

29 



LDY #>00 


0805 8412 

30 



STT L 


0807 841« 

31 



STT Z 


0809 8410 

32 



STT ANFL 


080B A906 

33 



LDA #BSPH 


080D 8511 

31 



STA ANFL+1 


080F A9DF 

35 

TEX0 

LDA #>DF 


0811 9110 

36 



STA (ANFL),Y 


0813 2035FD 

37 

TEX1 

JSR RDCHAR 


0816 8513 

38 



STA E 


0818 C983 

39 



CMP #>83 

;END OF TEXT 

081A 0003 

«0 



BNE TEX2 


081C 4C59FF 

41 



JMP H0NIT0 


081F C988 

42 

TEX2 

CMP #>88 

{CURSOR LINKS 

0821 0005 

43 



BNE TEX3 


0823 206508 

44 



JSR LINKS 


0826 90EB 

45 



BCC TEX1 


0828 C995 

46 

TEX3 

CMP #>95 

{CURSOR RECHTS 

08.°A 0005 

«7 



BNE TEX4 


082C 207208 

46 



JSR RECHTS 


082F 90E2 

49 



BCC TEX 1 


0831 C981 

50 

TEX4 

CMP #>81 

{CTRL-A 

0833 D005 

51 



BNE TEX5 


0835 208308 

52 



JSR L0E1 


0838 90D9 

53 



BCC TEX1 


083A C98C 

54 

TEX5 

CMP #>8C 

{CTRL-L 

083C D005 

55 



BNE TEX6 


083E 209608 

56 



JSR L0E2 


0841 90D0 

57 



BCC TEX1 


0843 C985 

58 

TEX6 

CMP #>85 

jCTRL-E 

0845 D005 

59 



BKE TEX7 


0847 20BB08 

60 



JSR EINF 
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;RETURN 


084A 

90C7 

61 


BCC 

TEX 1 

084C 

C98D 

62 

TEX7 

CMP 

#$8D 

084E 

D005 

63 


BNE 

TEX8 

0850 

20D908 

64 


JSR 

SPCHRN 

0853 

90AB 

65 


BCC 

TEXT 

0855 

A41 2 

66 

TEX8 

LDY 

L 

0857 

9110 

67 


STA 

(ANFL) , Y 

0859 

C8 

68 


INY 


085A 

8412 

69 


STY 

L 

085C 

C41 4 

70 


CPY 

Z 

085E 

90B3 

71 


BCC 

TEX 1 

0860 

E614 

72 


INC 

Z 

0862 

BOAB 

73 


BCS 

TEXO 

0864 


74 

| 



0864 


75 

> 



0864 

00 

76 

ENDE 

HEX 

00 

0865 

A41 2 

77 

LINKS 

LDY 

L 

0867 

88 

78 


DEY 


0868 

Bl 1 0 

79 


LDA 

(ANFL),Y 

086A 

293F 

80 


AND 

#»00111111 

086C 

9110 

81 


STA 

(ANFL) , Y 

086E 

8412 

82 


STY 

L 

0870 

18 

83 


CLC 


0871 

60 

84 


RTS 


0872 


85 

i 



0872 

A412 

86 

RECHTS 

LDY 

L 

0874 

C414 

87 


CPY 

Z 

0876 

F009 

88 


BEQ 

RERTS 

0878 

Bl 10 

89 


LDA 

(ANFL),Y 

087A 

09C0 

90 


ORA 

o 

o 

o 

o 

o 

o 

ft* 

'S» 

087C 

9110 

91 


STA 

(ANFL),Y 

087E 

C8 

92 


INY 


087F 

8412 

93 


STY 

L 

0881 

18 

94 

RERTS 

CLC 


0882 

60 

95 


RTS 


0883 


96 

» 



0883 

A41 2 

97 

LOE1 

LDY 

L 

0885 

Bl 1 0 

98 


LDA 

(ANFL),Y 

0887 

AA 

99 


TAX 


0888 

A9A0 

100 


LDA 

#$ A0 

088A 

9110 

101 


STA 

(ANFL),Y 

088C 

8A 

102 


TXA 


088D 

88 

103 


DEY 


088E 

9110 

104 


STA 

(ANFL),Y 

0890 

8412 

105 


STY 

L 

0892 

8414 

106 


STY 

Z 

0894 

18 

107 


CLC 


0895 

60 

108 


RTS 


0896 


109 

> 



0896 

A41 2 

110 

L0E2 

LDY 

L 

0898 

C414 

111 


CPY 

Z 

089A 

F01D 

112 


BEQ 

LLRTS 

089C 

C8 

113 

LO 

INY 


089D 

C414 

114 


CPY 

Z 

089F 

F009 

115 


BEQ 

LL 

08A1 

Bl 1 0 

116 


LDA 

(ANFL),Y 

08A3 

88 

117 


DEY 


08A4 

9110 

118 


STA 

(ANFL),Y 

08A6 

C8 

119 


INY 


08A7 

18 

120 


CLC 


08A8 

90F2 

121 


BCC 

LO 

08AA 

A41 4 

122 

LL 

LDY 

Z 

08AC 

Bl 10 

123 


LDA 

(ANFL),Y 

08AE 

AA 

124 


TAX 


08AF 

A9A0 

125 


LDA 

//n n 

08B1 

9110 

126 


STA 

(ANFL),Y 

08B3 

8A 

127 


TXA 


08B4 

88 

128 


DEY 


08B5 

9110 

129 


STA 

(ANFL) ,Y 


;EINFUEGEN DES ZEICHENS 


;IM TEXT 
;AM ENDE 


;BIT8 UND BIT7 = 0 


;BIT8 UND BIT7 = 1 


;LINKS SCHIEBEN MIT LOESCHEN 


;ZEICHEN BEI CURSOR 


; POSITION LOESCHEN 
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08B7 

8414 

130 


STY 

Z 



08B9 

18 

131 

LLRTS 

CLC 




08BA 

60 

132 


RTS 




08BB 


133 

1 





08BB 

A41 2 

134 

EINF 

LDY 

L 

; ZEICHEN 

AN CURSOR 

08BD 

C414 

135 


CPY 

Z 

; POSITION 

EINFUEGEN 

08BF 

F01 6 

136 


BEQ 

EINRTS 



08C1 

A41 4 

137 


LDY 

Z 



08C3 

Bl 10 

138 

EINF1 

LDA 

(ANFL),Y 



08C5 

C8 

139 


INY 




08C6 

9110 

140 


STA 

(ANFL), Y 



08C8 

88 

141 


DEY 




08C9 

C41 2 

142 


CPY 

L 



08CB 

08 

143 


PHP 




08CC 

88 

144 


DEY 




08CD 

28 

145 


PLP 




08CE 

D0F3 

146 


BNE 

EINF1 



08D0 

C8 

147 


INY 




08D1 

A9A0 

148 


LDA 

#« » 



08D3 

9110 

149 


STA 

(ANFL),Y 



08D5 

E614 

150 


INC 

Z 



08D7 

18 

151 

EINRTS 

CLC 




08D8 

60 

152 


RTS 




08D9 


153 

i 





08D9 

A000 

154 

SPCHRN 

LDY 

#$00 



08DB 

B11 0 

155 

SP1 

LDA 

(ANFL),Y 



08DD 

990010 

156 


STA 

TEXTBU,Y 



08E0 

C8 

157 


INY 




08E1 

C412 

158 


CPY 

L 



08E3 

D0F6 

159 


BNE 

SP 1 



08E5 

A039 

160 


LDY 

#$39 



08E7 

A9A0 

161 


LDA 

#" " 



08E9 

9110 

162 

SP2 

STA 

(ANFL),Y 



08EB 

88 

163 


DEY 




08EC 

DOFB 

164 


BNE 

SP2 



08EE 

18 

165 


CLC 




08EF 

60 

166 


RTS 




08F0 


167 








168 

FINI 

END 





***** END OF ASSEMBLY 


1 * 

* SYMBOL TABLE — V 1.5 * 

< f 

****#****#*#**#***#*####* 


LABEL. 

LOC. 

LABEL. 

LOC. 

LABEL. 

LOC. 

** ZERO PAGE 

VARIABLES: 



ANFL 

0010 

L 

0012 

E 

0013 

** ABSOLUTE VARABLES/LABELS 


HOME 

FC58 

MONITO 

FF59 



CRLF 

FD8E 

RDCHAR 

FD35 

BSPL 

0000 

TEXO 

080F 

TEX 1 

0813 

TEX2 

0 81 F 

TEX6 

0843 

TEX7 

084C 

TEX8 

0855 

RERTS 

0881 

L0E1 

0883 

L0E2 

0896 

EINF 

08BB 

EINF1 

08C3 

EINRTS 

08D7 

FINI 

08F0 





SYMBOL 

TABLE 

STARTING ADDRESS:6000 

SYMBOL 

TABLE 

LENGTH 

: 01 3 A 




Z 

0014 





BSPH 

0006 

TEXTBU 

1000 

TEXT 

0800 

TEX3 

0828 

TEX4 

0831 

TEX5 

083A 

ENDE 

0864 

LINKS 

0865 

RECHTS 

0872 

LO 

089C 

LL 

08AA 

LLRTS 

08B9 

SPCHRN 

08D9 

SP1 

08DB 

SP2 

08E9 
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7.36 Programm Textverarbeitung 


0800- 20 

58 

FC 

A0 

00 

84 

12 

84 

0808- 14 

84 

10 

A9 

06 

85 

11 

A9 

0810- DF 

91 

10 

20 

35 

FD 

85 

13 

0818- C9 

83 

DO 

03 

4C 

59 

FF 

C9 

0820- 88 

DO 

05 

20 

65 

08 

90 

EB 

0828- C9 

95 

DO 

05 

20 

72 

08 

90 

0830- E2 

C9 

81 

DO 

05 

20 

83 

08 

0838- 90 

D9 

C9 

8C 

DO 

05 

20 

96 

0840- 08 

90 

DO 

C9 

85 

DO 

05 

20 

0848- BB 

08 

90 

C7 

C9 

8D 

DO 

05 

0850- 20 

D9 

08 

90 

AB 

A4 

12 

91 

0858- 10 

C8 

84 

12 

C4 

14 

90 

B3 

0860- E6 

14 

B0 

AB 

00 

A4 

12 

88 

0868- Bl 

10 

29 

3F 

91 

10 

84 

12 

0870- 18 

60 

A4 

12 

C4 

14 

FO 

09 

0878- Bl 

10 

09 

CO 

91 

10 

C8 

84 

0880- 12 

18 

60 

A4 

12 

Bl 

10 

AA 

0888- A9 

A0 

91 

10 

8A 

88 

91 

10 

0890- 84 

12 

84 

14 

18 

60 

A4 

12 

0898- C4 

14 

F0 

ID 

C8 

C4 

14 

FO 

08A0- 09 

Bl 

10 

88 

91 

10 

C8 

18 

08A8- 90 

F2 

A4 

14 

Bl 

10 

AA 

A9 

08B0- A0 

91 

10 

8A 

88 

91 

10 

84 

08B8- 14 

18 

60 

A4 

12 

C4 

14 

FO 

08C0- 16 

A4 

14 

Bl 

10 

C8 

91 

10 

08C8- 88 

C4 

12 

08 

88 

28 

DO 

F3 

08D0- C8 

A9 

A0 

91 

10 

E6 

14 

18 

08d8- 60 

A0 

00 

Bl 

10 

99 

00 

10 

08E0- C8 

C4 

12 

DO 

F6 

AO 

39 

A9 

08E8- A0 
08F0- 73 

• 

91 

10 

88 

DO 

FB 

18 

60 


7.37 HEXDUMP Programm Textverarbeitung 


7.4 Mathematikroutinen 

Hier wollen wir je ein Beispiel für Multiplikation und Division be¬ 
trachten. 


7.41 8 x 8-bit Multiplikation 

Bei der Multiplikation sollen 2 8-bit Binärzahlen, ohne Vorzeichen 
miteinander zu einem 16-bit Produkt multipliziert werden. 


Als Algorithmus wird die "Schiebe und Addiere" -Methode verwendet, 
die man sich am Besten an einem Beispiel klarmacht. Die beiden Zahlen 
6 und 2 sollen miteinander multipliziert werden. 
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Multiplikant = 6 

0 

0 

0 

0 

0 

1 

1 

0 









Multiplikator = 2 

0 

0 

0 

0 

0 

0 

1 

0 









Ergebnis: 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


ERG ERG + 1 


Der Multiplikator (oder der Multiplikant) wird eine Stelle rechts ge¬ 
schoben. Ist das Carry-Bit 0 so wird das Ergebnis einmal rechts ge¬ 
schoben. Ist das Carry-Bit 1, so wird der Multiplikant (oder der Multi¬ 
plikator) erst zu ERG addiert und dann eine Stelle rechts geschoben. 


In unserem Beispiel ist nach dem 2. Schieben des Multiplikators der 
Inhalt von ERG und ERG + 1: 


0 

0 

0 

0 

0 

0 

1 

1 

0 

0 

0 

0 

0 

0 

0 

0 


ERG ERG + 1 


Nachdem im Multiplikator keine Eins mehr enthalten ist, wird das 
Ergebnis noch 6 mal nach rechts geschoben und wir erhalten das 
Ergebnis: 


0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

1 

1 

0 

0 


ERG ERG + 1 


12 


Das Programm in Abbildung 7.41 ist die 8 x 8-bit Multiplikations¬ 
routine. 
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0800 


2 




0300 


3 




0800 


4 


***#**######**#*######**## 

0800 


5 


* 


0800 


6 


* 8 

X 8 BIT MULTIPLIKATION 

0800 


7 


* 


0800 


8 


##***##*#####**#**###**### 

0800 


9 




0800 


10 




0800 


1 1 

Ml 

EPZ $10 

0800 


12 

M2 

EPZ $11 

0800 


13 

ERG 

EPZ $12 

0800 


14 

Z 

EPZ $14 

0800 


15 



0800 


16 




0800 

A900 

17 

MUL 

LDA #$00 

0802 

8512 

18 



STA ERG 

0804 

8513 

19 



STA ERG+1 

0806 

A908 

20 



LDA #$08 

0808 

8514 

21 



STA Z 

0 80A 

4610 

22 

M'JLI 

LSR Ml 

080C 

900D 

23 



BCC MUL2 

030E 

18 

24 



CLC 

oeoF 

A 51 1 

25 



LDA M2 

0811 

6512 

26 



ADC ERG 

0813 

8512 

27 



STA ERG 

0815 

A90C 

28 



LDA #$00 

0817 

6513 

29 



ADC ERG+1 

C 81 9 

351 3 

30 



STA ERG+1 

081 £ 

4612 

31 

MUL2 

LSR ERG 

08 ID 

6613 

32 



R0R ERG+1 

GolF 

C614 

33 



DEC Z 

0821 

D0E7 

34 



BNE MULI 

0823 

60 

35 



RTS 

0824 


36 






37 



END 


7.41 8 x 8-bit Multiplikation 


7.42 16 / 8-bit Division 

Bei der Division soll eine 16-bit Binärzahl, der Dividend, durch eine 
8-bit Binärzahl, dem Divisor, geteilt werden. Der bei der Division ver¬ 
bleibende Rest soll in einer Zelle gespeichert sein. Die einfachste Art, 
so eine Division durchzuführen, wäre das Abzählen, wie oft der Divisor 
vom Dividenden subtrahiert werden kann. Das würde aber unter Um¬ 
ständen zu sehr vielen Rechenschritten führen (Beispiel: 60000 : 2 = 
30000 Subtraktionen). Deshalb soll hier ein anderes Verfahren ange¬ 
wendet werden. Dieses ist in Abbildung 7.42 dargestellt. 

Der Divisor wird so lange nach links geschoben, bis er größer als der 
Dividend ist. Dies wird in einem Zähler mitgezählt. Danach wird einmal 
nach rechts geschoben und der Zähler um Eins erniedrigt. Dann beginnt 
die Division. Der Divisor ist jetzt kleiner, höchstens gleich dem Divi¬ 
denden und wird von diesem subtrahiert, und im Ergebnis Eins addiert. 


101 




7.42 Flußdiagramm 16/8 BIT DIVISION 
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Dann wird der Divisor einmal nach rechts geschoben und der Zähler 
wieder um Eins erniedrigt. Ist dieser Null, dann ist die Division be¬ 
endet. Wenn nicht, wird verglichen ob der Divisor kleiner als der Divi¬ 
dend ist. Wenn dies zutrifft, wird das Ergebnis 1 Stelle links geschoben, 
vom Dividend der Divisor abgezogen und zum Ergebnis Eins addiert. 

Dies wird solange durchgeführt bis der Divisor größer als der Dividend 
ist. Ist der Inhalt des Zählers dabei noch nicht Null, muß das Ergebnis 
noch solange nach rechts geschoben werden, bis dieser Null ist, erst 
dann ist die Division beendet. 


Im Flußdiagramm sind noch 3 weitere Abfragen. Ist der Divisor Null, 
so kann keine Division erfolgen. Ist gleich zu Beginn der Dividend 
kleiner als der Divisor, so braucht die Division ebenfalls nicht durch¬ 
geführt werden. Der Dividend enthält dann den verbleibenden Rest. 

Die dritte Abfrage bezieht sich auf das Linksschieben des Divisors. 
Dieses darf nur solange durchgeführt werden, solange der Divisor 
kleiner, höchstens gleich 2^ ist. Dann muß auf alle Fälle eine Sub¬ 
traktion erfolgen. 


Dies alles sei an einem Beispiel 13:4 = 3 Rest 1 gezeigt. 

Dividend 

1 1 

1 

Divisor 

— 1 — I-1-1 - 1 - F- 

1 

H- 

Nach 3 — 1=2 mal Linksschieben des Divisors 


Dividend 

1 1 

1A 


Divisor 

Zähler 

Ergebnis 



13 

4 

13 

8 

2 

0 
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Nach der ersten Subtraktion und dem Vergleich 


Dividend 

Divisor 

Zähler 

Ergebnis 


H-1-1-1-1-h 


-I—I-1-1-1-h 


H-1-H-h 


H—I—I—I—I—I—h 


-I—I—h 


5 

4 

1 

1 


Nach der zweiten Subtaktion und dem Vergleich 

H-1-1-•-1-1-1-1-1-1-1-1-h 


Dividend 

Divisor 

Zähler 

Ergebnis 




H—I—I—I—H 


-I-1-h 


H—I—I—l- 


1 1 


R. 1 
= 2 
= 0 
= 3 


Da der Dividend kleiner ist als der Divisor und der Zähler Null ist, ist 
die Divison beendet. Im Dividend verbleibt Eins als Rest, die Ergebnis¬ 
zelle enthält Drei. 


Obwohl der Divisor eine 8-bit Binärzahl ist, benötigt man für Dividend, 
Divisor und Ergebnis 2 Doppelzellen. Im Programm DIV (Abbildung 
7.43) wird das Y-Register als Zähler verwendet. 


Die 16-bit Binärzahlen sind hier in den beiden Zellen wie normale 
Zahlen gespeichert, mit LSB in SP + 1 und MSB in SP. 
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0800 


2 






0800 


3 






0800 


4 


ftft»ft#»*ftftftftftft*ftft**#ftftftftftftftftftft 

0800 


5 


« 



ft 

0800 


6 


* 16/8 BIT DIVISION 

ft 

0800 


7 


ft 



ft 

0800 


8 


ftft«ft***ft«ft«»«ftft«ftftftftftftftftft«ft*« 

0800 


9 






0800 


10 






0800 


11 

DIVDND 

EPZ 

$10 


0800 


12 

DIVISO 

EPZ 

$12 


0800 


13 

ERG 

EPZ 

$14 


0800 


14 






0800 


15 






0800 

A512 

16 

DIV 

LDA 

DIVISO 


0802 

D004 

17 



BNE 

DIV 1 


0804 

A51 3 

18 



LDA 

DIVISO+1 


0806 

F062 

19 



BEQ 

DIVNUL ; 

; DIVISION DURCH NULL 

0808 

A000 

20 

DIV 1 

LDY 

#$00 


080A 

8414 

21 



STY 

ERG 


080C 

8415 

22 



STY 

ERG+1 


080E 

205608 

23 

DIV2 

JSR 

COMPAR ; 

; DIVISOR <DIVIDENT 

0811 

B009 

24 



BCS 

WEITER 


0813 

C8 

25 



INY 



0814 

0613 

26 



ASL 

DIVISO+1 


0816 

2612 

27 



ROL 

DIVISO 


0818 

300C 

28 



BMI 

WEIT1 ; 

; DIVISOR> 2 Ä 15 

081A 

1 0F2 

29 



BPL 

DIV2 


081C 

EA 

30 

WEITER 

NOP 



081D 

COOO 

31 



CPY 

#$00 


081F 

F034 

32 



BEQ 

DIVRTS ; 

; KEINE DIVISION 

0821 

4612 

33 



LSR 

DIVISO ; 

; DIVISOR 1 STELLE —> 

0823 

6613 

34 



ROR 

DIVISO+1 


0825 

88 

35 

WEIT2 

DEY 



0826 

38 

36 

WEIT1 

SEC 



0827 

A51 1 

37 



LDA 

DIVDND+1 ; 

; SUBTRAKTION 

0829 

E51 3 

38 



SBC 

DIVISO+1 


082B 

8511 

39 



STA 

DIVDND+1 


082D 

A510 

40 



LDA 

DIVDND 


082F 

E512 

41 



SBC 

DIVISO 


0831 

8510 

42 



STA 

DIVDND 


0833 

E615 

43 



INC 

ERG+1 ; 

; ERGEBNIS+1 

0835 

D002 

44 



BNE 

DIV3 


0837 

E614 

45 



INC 

ERG 


0839 

EA 

46 

DIV3 

NOP 



083A 

COOO 

47 



CPY 

#$00 ; 

; ZAEHLER=0 ‘.FERTIG 

083C 

F017 

48 



BEQ 

DIVRTS 


083E 

4612 

49 



LSR 

DIVISO 


0840 

6613 

50 



ROR 

DIVISO+1 

DIVISOR 1 STELLE —> 

0842 

205608 

51 



JSR 

COMPAR 

DIVISOR <DIVIDEND 

0845 

B007 

52 



BCS 

DIV4 

JA 

0847 

0615 

53 



ASL 

ERG+1 

ERGEBNIS 1 STELLE <— 

0849 

2614 

54 



ROL 

ERG 


084B 

18 

55 



CLC 



084C 

90D7 

56 



BCC 

WEIT2 


084E 

0615 

57 

DIV4 

ASL 

ERG+1 ; 

; NEIN 

0850 

2614 

58 



ROL 

ERG 


0852 

88 

59 



DEY 



0853 

D0E4 

60 



BNE 

DIV3 


0855 

60 

61 

DIVRTS 

RTS 



0856 


62 






0856 


63 






0856 

A512 

64 

COMPAR 

LDA 

DIVISO 

DIVISOR<DIVIDEND C=0 

0858 

C510 

65 



CMP 

DIVDND 

DIVISOR=DIVIDEND C=0 

085A 

900D 

66 



BCC 

CRTS 

DIVISOR > DIVIDENT C=1 

085C 

F002 

67 



BEQ 

C2 


085E 

B009 

68 



BCS 

CRTS 


0860 

A513 

69 

C2 

LDA 

DIVISO+1 


0862 

C51 1 

70 



CMP 

DIVDND+1 
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0864 

F002 

71 


BEQ 

CI 

0866 

B001 

72 


BCS 

CRTS 

0868 

18 

73 

CI 

CLC 


0869 

60 

74 

CRTS 

RTS 


086A 


75 

| 



086A 


76 

9 



086A 

00 

77 

DIVNUL 

BRK 


086B 


78 

i 





79 


END 



0800- A5 

12 

DO 

04 

A5 

13 

FO 

62 

0808- A0 

00 

84 

14 

84 

15 

20 

56 

0810- 08 

BO 

09 

C8 

06 

13 

26 

12 

0818- 30 

OC 

10 

F2 

EA 

CO 

00 

FO 

0820- 34 

46 

12 

66 

13 

88 

38 

A5 

0828- 11 

E5 

13 

85 

11 

A5 

10 

E5 

0830- 12 

85 

10 

E6 

15 

DO 

02 

E6 

0838- 14 

EA 

CO 

00 

FO 

17 

46 

12 

0840- 66 

13 

20 

56 

08 

BO 

07 

06 

0848- 15 

26 

14 

18 

90 

D7 

06 

15 

0850- 26 

14 

88 

DO 

E4 

60 

A5 

12 

0858- C5 

10 

90 

OD 

FO 

02 

BO 

09 

0860- A5 

13 

C5 

1 1 

FO 

02 

BO 

01 


0868- 18 60 00 

* 


7.43 16/8 BIT DIVISION 


i 


7.5 Gleitkommaarithmetik 

Für Berechnungen, die über die Zahlengröße von 2^6 hinausgehen, 
wird die Darstellung einer Zahl in Gleitkommaformat verwendet. 


Die Zahl wird aufgeteilt in Exponent und Mantisse. Für den Expo¬ 
nenten wird ein Byte reserviert, für die Mantisse entweder 10 Byte 
für 10 Dezimalstellen (ATARI) oder 3 Byte für Binärdarstellung 
(APPLE, AIM . . .). 


Für die folgenden Programme wird die letztere Darstellung gewählt. 
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MSB LSB 



VORZEICHEN 
EXPONENT 
1 = positiv 
0 = negativ 


VORZEICHEN 
MANTISSE 
1 = negativ 
0 = positiv 


7.51 Gleitkommadarstellung 


Das Vorzeichen des Exponenten ist Bit 7. Für positive Zahlen ist es 
1, für negative Zahlen ist es 0. Damit erhalten wir folgende Zahlen¬ 
darstellung: 


% 1 000Q00 1 = S81 = 1 
% 1 0 0 0 0 0 0 0 = $80 = 0 
% 0 1 1 1 1 1 1 1 = S7F = -1 


Die Mantisse wird im 2-er Complement dargestellt. 

Das Vorzeichen ist auch hier Bit 7 von MSB. Für negative Mantissen ist 
es 1, für positive Mantissen ist es 0. Die Mantisse wird, zur Erhaltung 
der Rechengenauigkeit immer so normalisiert, daß die beiden höchsten 
Bit von MSB verschieden sind (Ausnahme: Zahlen kleiner 2 — ^28) 
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Damit erhält man folgende Zahlendarstellung: 


Dezimalzahl 

Exponent 

Mantisse 

+1 

$80 

$40 00 00 

-1 

$7F 

$80 00 00 

+2 

$81 

$40 00 00 

-2 

$80 

$80 00 00 

+0.5 

$7F 

$40 00 00 

+0.1 

$7C 

$66 66 66 

100.0 

$86 

$64 00 00 

-100.0 

$86 

$9C 00 00 


Die Unterprogramme für Addition, Subtraktion, Multiplikation und 
Division, sowie die Unterprogramme für In, log und die e-Funktion 
sind Dr. Dobbs Journal of Computer Calisthenics & Orthodontia 
(Volume 1, mit Fehlerberichtigung) entnommen. 


Die Unterprogramme belegen folgende Zellen in der Zero-Page 

Akkumulator 1 Exponent: $08, Mantisse: $09, $0A, $0B 

Akkumulator 2 Exponent: $04, Mantisse: $05, $06, $07 

Als Hilfszellen sind alle Speicherplätze von $02 bis $10 belegt. 


1. Unterprogramm FADD 
Anfangsadresse $849 

ZI in Akkumulator 1, Z2 in Akkumulator 2 
Ergebnis ZI + Z2 in Akkumulator 1. 


2. Unterprogramm FSUB 
Anfangsadresse $843 

ZI in Akkumulator 1, Z2 in Akkumulator 2 
Ergebnis Z2 — ZI in Akkumulator 1. 
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3. Unterprogramm FMUL 
Anfangsadresse S867 

ZI in Akkumulator 1, Z2 in Akkumulator 2 
Ergebnis ZI * Z2 in Akkumulator 1. 

4. Unterprogramm FDIV 
Anfangsadresse 388D 

ZI in Akkumulator 1, Z2 in Akkumulator 2 
Ergebnis Z2/Z1 in Akkumulator 1. 

5. Unterprogramm SWAP 
Anfangsadresse S81C 

Austausch Akkumulator 1 mit Akkumulator 2. 

6. Unterprogramm FLOAT 
Anfangsadresse S82C 

Umwandlung einer 16-bit Binärzahl mit MSB in S09 und LSB in 
309 in eine Gleitkommazahl. 

Ergebnis in Akkumulator 1. 

7. Unterprogramm FIX 
Anfangsadresse S8D5 

Umwandlung einer Gleitkommazahl kleiner 65 536 in Akkumulator 
1 in eine 16-bit Festkommazahl mit MSB in 309 und LSB in 30A. 

8. Unterprogramm LOG 
Anfangsadresse 38F6 

Bildung des natürlichen Logarithmus einer Zahl Z in Akkumulator 1, 
Ergebnis in Akkumulator 1. 

9. Unterprogramm LOG 10 
Anfangsadresse 39B5 

Bildung des dekadischen Logarithmus einer Zahl Z in Akkumulator 

1 . 

Ergebnis in Akkumulator 1. 

10. Unterprogramm EXPO 
Anfangsadresse 39E2 

Berechnung von e^ mit Z und anschließendem Ergebnis in Akku¬ 
mulator 1. 
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Die Programme und ihre Speicherauszüge sind in den Abbildungen 7.52 
bis 7.55 gezeigt. 


0800 


2 





0800 


3 





0800 


4 


##**#**#####**#* 

0800 


5 


# 



0800 


6 


* FLOATING POINT 

0800 


7 


* 



0800 


8 


**************** 

0800 


9 





0800 


10 





0800 


11 

SIGN 

EPZ 

$03 

0800 


12 

X2 

EPZ 

$04 

0800 


13 

M2 

EPZ 

$05 

0800 


14 

XI 

EPZ 

$08 

0800 


15 

Ml 

EPZ 

$09 

0800 


16 

E 

EPZ 

$0C 

0800 


17 

Z 

EPZ 

$10 

0800 


18 

T 

EPZ 

$14 

0800 


19 

SEXP 

EPZ 

$18 

0800 


20 

INT 

EPZ 

$1C 

0800 


21 





0800 


22 





0800 

18 

23 

ADD 

CLC 


0801 

A202 

24 



LDX 

#$02 

0803 

B509 

25 

ADD1 

LDA 

Ml ,X 

0805 

7505 

26 



ADC 

M2, X 

0807 

9509 

27 



STA 

Ml ,X 

0809 

CA 

28 



DEX 


080A 

10F7 

29 



BPL 

ADD1 

080C 

60 

30 



RTS 


080D 

0603 

31 

MDI 

ASL 

SIGN 

080F 

201208 

32 



JSR 

ABSWAP 

0812 

2409 

33 

ABSWAP 

BIT 

Ml 

0814 

1005 

34 



BPL 

ABSWA1 

0816 

207F08 

35 



JSR 

FCOMPL 

0819 

E603 

36 



INC 

SIGN 

081B 

38 

37 

ABSWA1 

SEC 


081C 

A204 

38 

SWAP 

LDX 

#$04 

0 81 E 

940B 

39 

SWAP1 

STY 

E-1 , X 

0820 

B507 

40 



LDA 

XI-1 , X 

0822 

B403 

41 



LDY 

X2-1,X 

0824 

9407 

42 



STY 

X1-1 ,X 

0826 

9503 

43 



STA 

X2-1 ,X 

0828 

CA 

44 



DEX 


0829 

D0F3 

45 



BNE 

SWAP1 

082B 

60 

46 



RTS 


082C 

A98E 

47 

FLOAT 

LDA 

#$8E 

082E 

8508 

48 



STA 

XI 

0830 

A509 

49 

NORM1 

LDA 

Ml 

0832 

C9C0 

50 



CMP 

#$ CO 

0834 

300C 

51 



BMI 

RTS1 

0836 

C608 

52 



DEC 

XI 

0838 

060B 

53 



ASL 

Ml +2 

083A 

260A 

54 



ROL 

Ml +1 

083C 

2609 

55 



ROL 

Ml 

083E 

A508 

56 

NORM 

LDA 

XI 

0840 

DOEE 

57 



BNE 

N0RM1 

0842 

60 

58 

RTS1 

RTS 


0843 


59 

i 

1 



0843 


60 

1 

l 



0843 

207F08 

61 

FSUB 

JSR 

FCOMPL 

0846 

205608 

62 

SWPALG 

JSR 

ALGNSW 

0849 

A504 

63 

FADD 

LDA 

X2 

084B 

C508 

64 



CMP 

XI 

084D 

D0F7 

65 



BNE 

SWPALG 
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084F 200008 
0852 50EA 
0854 7005 
0856 90C4 
0858 A509 
085A 0A 
085B E608 
085D F075 
085F A2FA 
0861 760F 
0863 E8 
0864 DOFB 
0866 60 
0867 
0867 

0867 200D08 
086A 6508 
086C 20BD08 
086F 18 
0870 205F08 
0873 9003 
0875 200008 
0878 88 
0879 10F5 
087B 4603 
087D 90BF 
087F 38 
0880 A203 
0882 A900 
0884 F508 
0886 9508 
0888 CA 
0889 D0F7 
088B F0C5 
088D 

088D 200D08 
0890 E508 
0892 20BD08 
0895 38 
0896 A202 
0898 B505 
089A F50C 
089C 48 
089D CA 
089E 10F8 
08A0 A2FD 
08A2 68 
08A3 9002 
08A5 9508 
08A7 E8 
08a8 D0F8 
08AA 260B 
08AC 260A 
08AE 2609 
08B0 0607 
08B2 2606 
08B4 2605 
08B6 B01C 
08B8 88 
08B9 DODA 
08BB FOBE 
08BD 860B 
08BF 860A 
08C1 8609 
08C3 BOOD 
08C5 3004 
08C7 68 
O8C8 68 
08C9 90B2 



JSR 

ADD 

ADDEND 

BVC 

NORM 


BVS 

RTLOG 

ALGNSW 

BCC 

SWAP 

FTAP 

LDA 

Ml 


ASL 


RTLOG 

INC 

XI 


BEQ 

OVFL 

RTL0G1 

LDX 

#$FA 

R0R1 

ROR 

E+3 f X 


INX 



BNE 

R0R1 

f 

RTS 


FMUL 

JSR 

MDI 


ADC 

XI 


JSR 

MD2 


CLC 


MULI 

JSR 

RTLOG1 


BCC 

MUL2 


JSR 

ADD 

MUL2 

DEY 



BPL 

MULI 

MDEND 

LSR 

SIGN 

NORMX 

BCC 

NORM 

FCOMPL 

SEC 



LDX 

#$ 03 

C0MPL1 

LDA 

#$00 


SBC 

XI ,x 


STA 

XI ,x 


DEX 



BNE 

C0MPL1 


BEQ 

ADDEND 

FDIV 

JSR 

MDI 


SBC 

XI 


JSR 

MD2 

DIV1 

SEC 



LDX 

//$02 

DIV2 

LDA 

M2, X 


SBC 

E, X 


PHA 



DEX 



BPL 

DIV2 


LDX 

//$FD 

DIV3 

PLA 



BCC 

DIV4 


STA 

M2+3»X 

DIV4 

INX 



BNE 

DIV3 


ROL 

Ml+2 


ROL 

Ml +1 


ROL 

Ml 


ASL 

M2+2 


ROL 

M2+1 


ROL 

M2 


BCS 

OVFL 


DEY 



BNE 

DIV 1 


BEQ 

MDEND 

MD2 

STX 

Ml +2 


STX 

Ml +1 


STX 

Ml 


BCS 

OVCHK 


BMI 

MD3 


PLA 



PLA 



BCC 

NORMX 


66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 


111 


08CB 

4980 

135 

MD3 

EOR 

#$80 

08CD 

8508 

136 



STA 

XI 

08CF 

A017 

137 



LDY 

#$17 

08D1 

60 

138 



RTS 


08D2 

10F7 

139 

OVCHK 

BPL 

MD3 

08DM 

00 

140 

OVFL 

BRK 


08D5 


141 


) 



08D5 


142 


) 



08D5 

205808 

143 

FIX 1 

JSR 

FTAP 

08D8 

A508 

144 

FIX 

LDA 

XI 

08DA 

1013 

145 



BPL 

UNDEFL 

08DC 

C98E 

146 



CMP 

#$8E 

08DE 

D0F5 

147 



BNE 

FIX1 

08E0 

2409 

148 



BIT 

Ml 

08E2 

1 00A 

149 



BPL 

FIXRTS 

08E4 

A50B 

150 



LDA 

Ml +2 

08E6 

F006 

151 



BEQ 

FIXRTS 

08E8 

E60A 

152 



INC 

Ml +1 

08EA 

D002 

153 



BNE 

FIXRTS 

08EC 

E609 

154 



INC 

Ml 

08EE 

60 

155 

FIXRTS 

RTS 


08EF 

A900 

156 

UNDEFL 

LDA 

#$00 

08F1 

8509 

157 



STA 

Ml 

08F3 

850A 

158 



STA 

Ml +1 

08F5 

60 

159 



RTS 


08F6 


160 





08F6 


161 





08F6 


162 


«ft********»*»«*** 

08F6 


163 


« 



08F6 


164 


* LOG, 

.L0G1 0 UND E: 

08F6 


165 


* UNTERPROGRAMME 

08F6 


166 


* 



08F6 


167 





08F6 


168 





08F6 


169 





08F6 

A509 

170 

LOG 

LDA 

Ml 

08F8 

F002 

171 



BEQ 

ERROR 

08FA 

1001 

172 



BPL 

CONT 

08FC 

00 

173 

ERROR 

BRK 


08FD 


174 

! 

1 



08FD 

201C08 

175 

CONT 

JSR 

SWAP 

0900 

A200 

176 



LDX 

#$00 

0902 

A504 

177 



LDA 

X2 

0904 

A080 

178 



LDY 

#$80 

0906 

8404 

179 



STY 

X2 

0908 

4980 

180 



EOR 

#$80 

090A 

850A 

181 



STA 

Ml +1 

090C 

1001 

182 



BPL 

SEXP2 

090E 

CA 

183 



DEX 


090F 

8609 

184 

SEXP2 

STX 

Ml 

0911 

202C08 

185 



JSR 

FLOAT 

0914 

A203 

186 



LDX 

#3 

0916 

B504 

187 

SEXP1 

LDA 

X2, X 

0918 

9510 

188 



STA 

Z,X 

091 A 

B508 

189 



LDA 

XI ,X 

091 C 

9518 

190 



STA 

SEXP, X 

091E 

BDCA09 

191 



LDA 

R22, X 

0921 

9508 

192 



STA 

XI ,X 

0923 

CA 

193 



DEX 


0924 

1 OFO 

194 



BPL 

SEXP 1 

0926 

204308 

195 



JSR 

FSUB 

0929 

A203 

196 



LDX 

#3 

092B 

B508 

197 

SAVET 

LDA 

XI ,X 

092D 

9514 

198 



STA 

T, X 

092F 

B510 

199 



LDA 

Z,X 

0931 

9508 

200 



STA 

XI ,X 

0933 

BDCA09 

201 



LDA 

R22, X 

0936 

9504 

202 



STA 

X2, X 

0938 

CA 

203 



DEX 



112 





0939 10F0 204 
093B 204908 205 
093E A203 206 
0940 B514 207 
0942 9504 208 
0944 CA 209 
0945 10F9 210 
0947 208D08 211 
094A A203 212 
094C B508 213 
094E 9514 214 
0950 9504 215 
0952 CA 216 
0953 10F7 217 
0955 206708 218 
0958 201C08 219 
095B A203 220 
095D BDDA09 221 
0960 9508 222 
0962 CA 223 
0963 10F8 224 
0965 204308 225 
0968 A203 226 
096A BDD609 227 
096D 9504 228 
096F CA 229 
0970 10F8 230 
0972 208D08 231 
0975 A203 232 
0977 BDD209 233 
097A 9504 234 
097C CA 235 
097D 10F8 236 
097F 204908 237 
0982 A203 238 
0984 B514 239 
0986 9504 240 
0988 CA 241 
0989 10F9 242 
098B 206708 243 
098E A203 244 
0990 BDDE09 245 
0993 9504 246 
0995 CA 247 
0996 10F8 248 
0998 204908 249 
099B A203 250 
099D B518 251 
099F 9504 252 
09A1 CA 253 
09A2 10F9 254 
09A4 204908 255 
09A7 A203 256 
09A9 BDCE09 257 
09AC 9504 258 
09AE CA 259 
09AF 10F8 260 
09B1 206708 261 
09B4 60 262 
09B5 263 
09B5 264 
09B5 265 
09B5 20F608 266 
09B8 A203 267 
09BA BDC609 268 
09BD 9504 269 
09BF CA 270 
09C0 10F8 271 
09C2 206708 272 



BPL 

SAVET 


JSR 

FADD 


LDX 

//3 

TM2 

LDA 

T, X 


STA 

DEX 
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09C5 

60 

273 


RTS 


09C6 


274 

1 



09C6 

7E6F2D 

275 

LN10 

HEX 7E6F2DED 

; 0.4342945 

09C9 

ED 





09CA 
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R22 

HEX 805A827A 

; 1.4142136 

09CD 

7A 
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7F58B9 
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HEX 7F58B90C 
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09D1 

OC 





09D2 

8052B0 
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AI 

HEX 8052B040 

; 1.2920074 

09D5 

40 





09D6 

81AB86 
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MB 

HEX 81AB8649 

; -2.6398577 

09D9 

49 





09DA 

806A08 
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C 
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09DD 
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09DE 
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; 0.5 

0 9 E1 

00 





09E2 


282 

j 



09E2 
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J 



09E2 

A203 

284 

EXP 

LDX #3 


09E4 

BDBAOA 

285 


LDA L2E,X 


09E7 

9504 

286 


STA X2|X 


09E9 

CA 

287 


DEX 


09EA 

10F8 

288 


BPL EXP+2 


09EC 

206708 

289 


JSR FMUL 


09EF 

A203 

290 


LDX #3 


09F1 

B508 

291 

FSA 

LDA XI,X 


09F3 

9510 

292 


STA Z,X 


09F5 

CA 

293 


DEX 


09F6 

10F9 

294 


BPL FSA 


09F8 

20D808 

295 


JSR FIX 


09FB 

A50A 

296 


LDA Ml +1 


09FD 

851C 

297 


STA INT 


09FF 

38 

298 


SEC 


OAOO 

E97C 

299 


SBC #124 


0A02 

A509 

300 


LDA Ml 


0A04 

E900 

301 


SBC #0 


0A06 

1015 

302 


BPL OVFLW 


0A08 

18 

303 


CLC 


0A09 

A50A 

304 


LDA Ml+1 


OAOB 

6978 

305 


ADC #120 


OAOD 

A509 

306 


LDA Ml 


OAOF 

6900 

307 


ADC #0 


OA11 

1 OOB 

308 


BPL CONTIN 


OA1 3 

A900 

309 


LDA #0 


OA1 5 

A203 

310 


LDX #3 


OA17 

9508 

311 

ZERO 

STA XI,X 


OA19 

CA 

312 


DEX 


OA1A 

1 OFB 

313 


BPL ZERO 


OA1C 

60 

314 


RTS 


OA1D 


315 

j 



OA1D 

00 

316 

OVFLW 

BRK 


OA1E 


317 

; 



OA1E 

202C08 

318 

CONTIN 

JSR FLOAT 


0A21 

A203 

319 


LDX #3 


OA23 

B510 

320 

ENTD 

LDA Z,X 


0A25 

9504 

321 


STA X2,X 


0A27 

CA 

3 22 


DEX 


0A28 

10F9 

323 


BPL ENTD 


0A2A 

204308 

324 


JSR FSUB 


0A2D 

A203 

325 


LDX #3 


0A2F 

B508 

326 

ZSAV 

LDA XI,X 


OA31 

9510 

327 


STA Z,X 


OA33 

9504 

328 


STA X2,X 


OA35 

CA 

329 


DEX 


OA36 

10F7 

330 


BPL ZSAV 


OA38 

206708 

331 


JSR FMUL 


OA3B 

A203 

332 


LDX #3 


OA3D 

BDBEOA 

333 

LA2 

LDA A2,X 


0A40 

9504 

334 


STA X2,X 
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0A42 

B508 

335 


LDA 

XI ,X 


0A44 

9518 

336 


STA 

SEXP,X 


0A46 

CA 

337 


DEX 



0A47 

10F4 

33ö 


5PL 

LA2 


0A49 

204908 

339 


JSR 

FADD 


0A4C 

A203 

340 


LDX 

#3 


0A4E 

EDC20A 

341 

LB2 

I.DA 

B2, X 


0A51 

9504 

342 


STA 

X2,X 


0A53 

CA 

343 


DEX 



0A54 

10F8 

344 


BPL 

LB2 


OA56 

208D08 

345 


JSR 

FD IV 


0A59 

A203 

346 


LDX 

#3 


0A5B 

B508 

347 

DLOAD 

LDA 

XI ,X 


0A5D 

9514 

348 


STA 

T, X 


0A5F 

BDC60A 

349 


LDA 

C2 , X 


0A62 

9508 

350 


STA 

XI ,X 


0A64 

B51 8 

351 


LDA 

SEXP,X 


0A66 

9504 

352 


STA 

X2, X 


0A68 

CA 

353 


DEX 



0A69 

1 CFO 

354 


BPL 

DLOAD 


OAoB 

206708 

355 


JSR 

FMUL 


0A6E 

201C08 

356 


JSR 

SWAP 


0A71 

A203 

357 


LDX 

#3 


0A7 3 

B514 

358 

LTMP 

LDA 

T, X 


0A75 

9508 

359 


STA 

XI ,X 


0A77 

CA 

360 


DEX 



0A7 8 

10F9 

361 


BPL 

LTMP 


0A7A 

204308 

362 


JSR 

FSUB 


0A7D 

A203 

363 


LDX 

#3 


0A7F 

BDCAOA 

364 

LDD 

LDA 

D,X 


0A82 

9504 

365 


STA 

X2, X 


0A84 

CA 

366 


DEX 



0A85 

10F8 

367 


BPL 

LDD 


0A87 

204908 

368 


JSR 

FADD 


0A8A 

201C08 

369 


JSR 

SWAP 


0A8D 

A203 

370 


LDX 

// 3 


0A8F 

B510 

371 

LFA 

LDA 

Z,X 


0A91 

9508 

372 


STA 

XI ,x 


OA93 

CA 

373 


DEX 



0A94 

10F9 

374 


BPL 

LFA 


OA96 

204308 

375 


JSR 

FSUB 


OA99 

A203 

376 


LDX 

#3 


0A9B 

B510 

377 

LF3 

LDA 

Z,X 


0A9D 

9504 

378 


STA 

X2,X 


0A9F 

CA 

379 


DEX 



OAAO 

10F9 

380 


BPL 

LF3 


OAA 2 

208D08 

381 


JSR 

FDIV 


0AA5 

A203 

382 


LDX 

#3 


0AA7 

BDDE09 

383 

LD1 2 

LDA 

MHLF,X 


OAAA 

9504 

384 


STA 

X2, X 


OAAC 

CA 

385 


DEX 



OAAD 

10F8 

386 


BPL 

LD12 


OAAF 

204908 

387 


JSR 

FADD 


0AB2 

38 

388 


SEC 



OAB3 

A51C 

389 


LDA 

INT 


OAB5 

6508 

390 


ADC 

XI 


OAB7 

8508 

391 


STA 

XI 


OAB9 

60 

392 


RTS 



OABA 

805C55 

393 

L2E 

HEX 

805C551E 

; 1.4426950509 

OABD 

IE 






OABE 

86576A 

394 

A2 

HEX 

8657 6AE' 

; 87.417497202 

OAC 1 

El 






0AC2 

894D3F 

395 

B2 

HEX 

894D3F1D 

; 617.9722695 

OAC5 

ID 






OAC6 

7B46FA 

396 

C2 

HEX 

7B46FA70 

; .03465735903 

OAC9 

70 






0 ACA 

834FA3 

397 

D 

HEX 

834FA303 

; 9.9545957821 

OACD 

03 






OACE 


398 

; 






399 

FI NI 

F.ND 




7.52 Gleitkommaroutinen 
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0800- 18 

A2 

02 

B5 

09 

75 

05 

95 

0808- 09 

CA 

10 

F7 

60 

06 

03 

20 

0810- 12 

08 

24 

09 

10 

05 

20 

7F 

0818- 08 

E6 

03 

38 

A2 

04 

94 

OB 

0820- B5 

07 

B4 

03 

94 

07 

95 

03 

0828- CA 

DO 

F3 

60 

A9 

8E 

85 

08 

0830- A5 

09 

C9 

CO 

30 

OC 

C6 

08 

0838- 06 

OB 

26 

OA 

26 

09 

A5 

08 

0840- DO 

EE 

60 

20 

7F 

08 

20 

56 

0848- 08 

A5 

04 

C5 

08 

DO 

F7 

20 

0850- 00 

08 

50 

EA 

70 

05 

90 

C4 

0858- A5 

09 

OA 

E6 

08 

FO 

75 

A2 

0860- FA 

76 

OF 

E8 

DO 

FB 

60 

20 

0868- OD 

08 

65 

08 

20 

BD 

08 

18 

0870- 20 

5F 

08 

90 

03 

20 

00 

08 

0878- 88 

10 

F5 

46 

03 

90 

BF 

38 

0880- A2 

03 

A9 

00 

F5 

08 

95 

08 

0888- CA 

DO 

F7 

FO 

C5 

20 

OD 

08 

0890- E5 

08 

20 

BD 

08 

38 

A2 

02 

0898- B5 

05 

F5 

OC 

48 

CA 

10 

F8 

08A0- A2 

FD 

68 

90 

02 

95 

08 

E8 

08A8- DO 

F8 

26 

OB 

26 

OA 

26 

09 

08B0- 06 

07 

26 

06 

26 

05 

BO 

IC 

08B8- 88 

DO 

DA 

FO 

BE 

86 

OB 

86 

08C0- OA 

86 

09 

BO 

OD 

30 

04 

68 

08C8- 68 

90 

B2 

49 

80 

85 

08 

AO 

08D0- 17 

60 

10 

F7 

00 

20 

58 

08 

08D8- A5 

08 

10 

13 

C9 

8E 

DO 

F5 

08E0- 24 

09 

10 

OA 

A5 

OB 

FO 

06 

08E8- E6 

OA 

DO 

02 

E6 

09 

60 

A9 

08F0- 00 

85 

09 

85 

OA 

60 
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7.53 Hexdump FADD, FSUB, FMUL, FDIV 


08F6- A5 

09 
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00 
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00 

A5 

04 

AO 
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84 

04 
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80 

85 
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01 

CA 
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2C 

08 
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03 

B5 

04 

0918- 95 

10 

B5 

08 

95 

18 

BD 

CA 

0920- 09 

95 

08 

CA 

10 

FO 

20 

43 

0928- 08 

A2 

03 

B5 

08 

95 

14 

B5 

0930- 10 

95 

08 

BD 

CA 

09 

95 

04 

0938- CA 

10 

FO 

20 

49 

08 

A2 

03 

0940- B5 

14 

95 

04 

CA 

10 

F9 

20 

0948- 8D 

08 

A2 

03 

B5 

08 

95 

14 

0950- 95 

04 

CA 

10 

F7 

20 

67 

08 

0958- 20 

IC 

08 

A2 

03 

BD 

DA 

09 

0960- 95 

08 

CA 

10 

F8 

20 

43 

08 

0968- A2 

03 

BD 

D6 

09 

95 

04 

CA 

0970- 10 

F8 

20 

8D 

08 

A2 

03 

BD 

0978- D2 

09 

95 

04 

CA 

10 

F8 

20 

0980- 49 

08 

A2 

03 

B5 

14 

95 

04 

0988- CA 

10 

F9 

20 

67 

08 

A2 

03 

0990- BD 

DE 

09 

95 

04 

CA 

10 

F8 

0998- 20 

49 

08 

A2 

03 

B5 

18 

95 

09A0- 04 

CA 

10 

F9 

20 

49 

08 

A2 

09A8- 03 

BD 

CE 

09 

95 

04 

CA 

10 

09B0- F8 

20 

67 

08 

60 

20 

F6 

08 

09B8- A2 

03 

BD 

C6 

09 

95 

04 

CA 

09C0- 10 

F8 

20 

67 

08 

60 

7E 

6F 

09C8- 2D 

ED 

80 

5A 

82 

7A 

7F 

58 

09D0- B9 

OC 

80 

52 

BO 

40 

81 

AB 

09D8- 86 
09E0- 00 

* 

49 

00 

80 

6A 

08 

66 

7F 

40 
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7.54 Hexdump LOG, LOGIO 


09E2- A2 03 BD 
09E8- 09 CA 10 
09F0- 03 B5 08 
09F8- 20 D8 08 
0A00- E9 7C A5 
0A08- 18 A5 OA 
0A10- 00 10 OB 
0A18- 08 CA 10 
0A20- 08 A2 03 
0A28- 10 F9 20 
0A30- 08 95 10 
0A38- 20 67 08 
0A40- 95 04 B5 
0A48- F4 20 49 
0A50- OA 95 04 
0A58- 08 A2 03 
0A60- C6 OA 95 
0A68- CA 10 FO 
0A70- 08 A2 03 
0A78- 10 F9 20 
0A80- CA OA 95 
0A88- 49 08 20 
0A90- 10 95 08 
0A98- 08 A2 03 
OAAO- 10 F9 20 
0AA8- DE 09 95 
OABO- 49 08 38 
0AB8- 08 60 80 
OACO- 6A El 89 
0AC8- FA 70 83 


BA OA 95 
F8 20 67 08 A2 
F9 
38 
15 
69 
95 
2C 
CA 
B5 
F7 
OA 
10 
C2 
8D 
BD 
04 
IC 
CA 
BD 
20 
B5 
43 
CA 
BD 
20 
85 
57 
46 


95 

10 

CA 

10 

A5 

OA 

85 

IC 

09 

E9 

00 

10 

69 

78 

A5 

09 

A9 

00 

A2 

03 

FB 

60 

00 

20 

B5 

10 

95 

04 

43 

08 

A2 

03 

95 

04 

CA 

10 

A2 

03 

BD 

BE 

08 

95 

18 

CA 

08 

A2 

03 

BD 

CA 

10 

F8 

20 

B5 

08 

95 

14 

08 

B5 

18 

95 

20 

67 

08 

20 

B5 

14 

95 

08 

43 

08 

A2 

03 

04 

CA 

10 

F8 

IC 

08 

A2 

03 

CA 

10 

F9 

20 

B5 

10 

95 

04 

8D 

08 

A2 

03 

04 

CA 

10 

F8 

A5 

IC 

65 

08 

5C 

55 

IE 

86 

4D 

3F 

ID 

7B 

4F 

A3 

03 



7.55 Hexdump EXP. 


Diese Gleitkommaprogramme müssen noch durch Unterprogramme für 
die Ein- und Ausgabe von Gleitkommazahlen erweitert sein. Für die 
Eingabe soll folgende Schreibweisen erlaubt sein: 


listgleich: 1 , 1. , 1.0 , 1EO , 0.1E1 , +1 , 10E-1 


Diese Vielfalt der Möglichkeiten muß durch Programm mit sehr vielen 
Abfragen und Entscheidungen erfasst werden. Das Flußdiagramm der 
Eingaberoutine zeigt Abbildung 7.56. Die benötigten Unterprogramme 
und das Hauptprogramm sind in Abbildung 7.57 zusammengestellt. 
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7.56 Flußdiagramm Eingabe 
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OACE 
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DEX 
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VZE 
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EXP 
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MAXS 
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OACE 


421 
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$1E 
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422 
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$1F 
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423 

j 




OACE 
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OACE 


425 

RDCHAR 

EQU 
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427 
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428 


ORG 

$B00 
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429 

9 
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430 

9 




OBOO 


431 

9 




OBOO 

A21A 

432 

CLEAR 

LDX 

#$1A 

jBENUTZTE ZELLEN NULL SETZEN 

0B02 

A900 

433 


LDA 

#$00 


0B04 

9502 

434 

CL1 

STA 

$02,X 


0B06 

CA 

435 


DEX 



0B07 

1 OFB 

436 


BPL 

CL1 


0B09 

60 

437 


RTS 



OBOA 


438 

9 




OBOA 


439 

9 




OBOA 

2035FD 

440 

IN 

JSR 

RDCHAR 

; ZEICHENEINGABE 

OBOD 

8514 

441 


STA 

INM 


OBOF 

20DAFD 

442 


JSR 

PRTBYT 


OBI 2 

A514 

443 


LDA 

INM 


OBI 4 

60 

444 


RTS 



OBI 5 


445 

f 




OBI 5 


446 





OBI 5 

C9B0 

447 

DIGIT 

CMP 

#»0" 

; ZEICHEN = ZAHL? 

0B17 

900A 

448 


BCC 

DI 


OBI 9 

C9C1 

449 


CMP 

#"A" 


OBI B 

B006 

450 


BCS 

DI 


OBI D 

290F 

451 


AND 

#$0F 


OBI F 

8517 

452 


STA 

INZ 


0B21 

A900 

453 


LDA 

#$00 


0B23 

60 

454 

DI 

RTS 



0B24 


455 

j 


1 


0B24 


456 

j 




0B24 

060B 

457 

Ml SL 

ASL 

ACCU1+I3 

; MANTISSE1 EINE 

0B26 

260A 

458 


ROL 

ACCU1+I2 

; STELLE LINKS 

0B28 

2609 

459 


ROL 

ACCU1+!1 

; SCHIEBEN 

0B2A 

60 

460 


RTS 



0B2B 


461 

• 




0B2B 


462 

j 




0B2B 

A203 

463 

A1A2 

LDX 

#$03 

;ACCU1 NACH ACCU2 SCHREIBEN 

0B2D 

B508 

464 

AI 00 
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0B2F 
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STA 
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0B31 

CA 

466 


DEX 



0B32 
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BPL 

AI 00 


OB34 

60 
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RTS 
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OB35 

202B0B 
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JSR 
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472 
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0B3B 
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473 
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Ml SL 
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JSR 

ADD 

0B41 
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4/5 


JMP 

Ml SL 
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0B44 


477 ; 




0B44 

A996 

478 NORMA 

LDA 

#$96 

0B46 

8508 

479 


STA 

ACCU1 

0B48 

4C3E08 

480 


JMP 

NORM 

0B4B 


481 

1 



0B4B 


482 




0B4B 

A509 

483 NULL 

LDA 

Ml 

0B4D 

D006 

484 


BNE 

NU1 

0B4F 

A50A 

485 


LDA 

Ml +! 1 

0B51 

D002 

486 


BNE 

NU1 

OB53 

A50B 

487 


LDA 

M1 + I2 

OB55 

60 

488 NU1 

RTS 


0B56 


489 ; 

I 



0B56 


490 




0B56 

A203 

491 A2Z 

LDX 

#$03 

0B58 

B504 

492 A21 

LDA 

ACCU2,X 

0B5A 

9510 

493 


STA 

ZREG|X 

0B5C 

CA 

494 


DEX 


0B5D 

10F9 

495 


BPL 

A21 

0B5F 

60 

496 


RTS 


0B60 


497 




0B60 

A203 

498 ZA2 

LDX 

#$03 

0B62 

B510 

499 ZA21 

LDA 

ZREG,X 

0B64 

9504 

500 


STA 

ACCU2,X 

0B66 

CA 

501 


DEX 


0B67 

10F9 

502 


BPL 

ZA21 

0B69 

60 

503 


RTS 


0B6A 


504 

i 



0B6A 

A900 

505 TEN 

LDA 

#$00 

0B6C 

8509 

506 


STA 

Ml 

0B6E 

A90A 

507 


LDA 

#$0A 

0B70 

850A 

508 


STA 

Ml +1 

0B72 

4C2C08 

509 


JMP 

FLOAT 

0B75 


510 

I 



0B75 

A000 

511 STORE 

LDY 

#$00 

0B77 

B90800 

512 ST1 

LDA 

ACCU1 ,Y 

0B7A 

911E 

513 


STA 

(ADL),Y 

0B7C 

C8 

514 


INY 


0B7D 

C004 

515 


CPY 

#$04 

0B7F 

D0F6 

516 


BNE 

ST1 

0B81 

60 

517 


RTS 


0B82 


518 ; 

> 



0B82 

AOOO 

519 LOAD 

LDY 

#$00 

0B84 

Bl 1E 

520 L01 

LDA 

(ADL),Y 

0B86 

990800 

521 


STA 

ACCU1,Y 

0B89 

C8 

522 


INY 


0B8A 

COl'4 

523 


CPY 

#$04 

0B8C 

D0F6 

524 


BNE 

L01 

0B8E 

60 

525 


RTS 


0B8F 

60 

528 


RTS 


0B90 


529 




0B90 


530 




0B90 


531 




0B90 


532 




0B90 


533 




0B90 


534 

* 



0B90 


535 

* tastenfeld-einga: 

0B90 


536 

* ACCU2. 


0B90 


537 

* 



0B90 


538 

****************** 

0B90 


539 




0B90 


540 




0B90 

20000B 

541 EIN 

JSR 

CLEAR 


; MANTISSE1 MIT 10 


;ACCU2 NACH ZREG 


;ZREG NACH ACCU2 


MULTIPLIZIEREN 
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0B93 

200A0B 

542 

0B96 

C9AB 

543 

OB98 

F006 

544 

0B9A 

C9AD 

545 

0B9C 

D005 

546 

0B9E 

E603 

547 

OBAO 

200A0B 

548 

0BA3 

C9AE 

549 

0BA5 

D008 

550 

0BA7 

A515 

551 

0BA9 

D075 

552 

OBAB 

E615 

553 

OBAD 

10F1 

554 

OBAF 

20150B 

555 

0BB2 

D025 

556 

0BB4 

A51C 

557 

0BB6 

D021 

558 

0BB8 

20350B 

559 

OBBB 

1007 

560 

OBBD 

201C08 

561 

OBCO 

E61C 

562 

0BC2 

1 ODC 

563 

0BC4 

A517 

564 

0BC6 

8507 

565 

0BC8 

A900 

566 

OBCA 

8506 

567 

OBCC 

8505 

568 

OBCE 

200008 

569 

0BD1 

A515 

570 

0BD3 

FOCB 

571 

0BD5 

C 616 

572 

0BD7 

30C7 

573 

0BD9 

EA 

574 

OBDA 

EA 

575 

OBDB 

C9C5 

576 

OBDD 

D041 

577 

OBDF 

200A0B 

578 

0BE2 

C9AB 

579 

0BE4 

F006 

580 

0BE6 

C9AD 

581 

0BE8 

D005 

582 

OBEA 

E618 

583 

OBEC 

200A0B 

584 

OBEF 

20150B 

585 

0BF2 

D02C 

586 

0BF4 

A517 

587 

0BF6 

8519 

588 

0BF8 

200A0B 

589 

OBFB 

20150B 

590 

OBFE 

DOOD 

591 

OCOO 

A519 

592 

0C02 

OA 

593 

0C03 

OA 

594 

0C04 

18 

595 

0C05 

6519 

596 

0C07 

OA 

597 

0C08 

18 

598 

0C09 

6517 

599 

OCOB 

8519 

600 

OCOD 

A618 

601 

OCOF 

F008 

602 

0C11 

A519 

603 

0C1 3 

49FF 

604 

0C15 

8519 

605 

0C17 

E619 

606 

QC19 

A516 

607 

0C1B 

18 

608 

o'cic 

6519 

609 

0C1E 

8516 

610 


JSR IN 
CMP //"+" 
BEQ Eil 
CMP 

BNE EI2 
INC VZM 
Eli JSR IN 

EI2 CMP #"." 

BNE EI3 
LDA DPM 
BNE Eil 0 
INC DPM 
BPL Eli 

EI3 JSR DIGIT 

BNE EI5 
LDA MAXS 
BNE EI5 
JSR MULTEN 
BPL EI4 
JSR SWAP 
INC MAXS 
BPL Eli 
EI4 LDA INZ 

STA M2+2 
LDA #$00 
STA M2+1 
STA M2 
JSR ADD 
LDA DPM 
BEQ Eil 
DEC DEX 
BMI Eil 
EI5 NOP 

NOP 

CMP #"E" 
BNE EU0 
JSR IN 
CMP #"+" 
BEQ EI6 
CMP #"-" 
BNE EI7 
INC VZE 
EI6 JSR IN 

EI7 JSR DIGIT 

BNE EI10 
LDA INZ 
STA EXP 
JSR IN 
JSR DIGIT 
BNE EI8 
LDA EXP 
ASL 
ASL 
CLC 

ADC EXP 

ASL 

CLC 

ADC INZ 
STA EXP 
EI8 LDX VZE 

BEQ EI9 
LDA EXP 
EOR #$FF 
STA EXP 
INC EXP 
EI9 LDA DEX 

CLC 

ADC EXP 
STA DEX 
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0C20 

20440B 

611 

Eil 0 

JSR 

NORMA 

0C23 

A503 

612 


LDA 

VZM 

0C25 

F003 

613 


BEQ 

Ein 

0C27 

207F08 

614 


JSR 

FCOMPL 

0C2A 

EA 

615 

Ein 

NOP 


0C2B 

A900 

616 


LDA 

#$00 

0C2D 

8507 

617 


STA 

M2+2 

0C2F 

201C08 

618 


JSR 

SWAP 

QC32 

A516 

619 


LDA 

DEX 

0C34 

F034 

620 


BEQ 

Eli 5 

OC36 

301F 

621 


BMI 

Eil 4 

OC38 

20560B 

622 


JSR 

A2Z 

0C3B 

206A0B 

623 


JSR 

TEN 

0C3E 

202B0B 

624 


JSR 

A1A2 

0C41 

C616 

625 

EI12 

DEC 

DEX 

0C43 

F006 

626 


BEQ 

EI13 

0C45 

206708 

627 


JSR 

FMUL 

0C48 

18 

628 


CLC 


0C49 

90F6 

629 


BCC 

Eli 2 

0C4B 

20600B 

630 

eii 3 

JSR 

ZA2 

0C4E 

206708 

631 


JSR 

FMUL 

0C51 

201C08 

632 


JSR 

SWAP 

0C54 

18 

633 


CLC 


0C55 

9013 

634 


BCC 

EI15 

0C57 

20560B 

635 

E114 

JSR 

A2Z 

0C5A 

206A0B 

636 


JSR 

TEN 

0C5D 

208D08 

637 


JSR 

FDIV 

0C60 

201C08 

638 


JSR 

SWAP 

OC63 

E616 

639 


INC 

DEX 

0C65 

F003 

640 


BEQ 

Eil 5 

0C67 

18 

641 


CLC 


0C68 

90ED 

642 


BCC 

EI14 

0C6A 

A900 

643 

E115 

LDA 

#$00 

0C6C 

851C 

644 


STA 

MAXS 

0C6E 

60 

645 


RTS 


0C6F 


646 

9 



0C6F 


647 

9 





648 

FINI 

END 



***** END OF ASSEMBLY 

5.57 Gleitkommaeingabe 


BR 


»B00.C6F 

0B00- A2 

1A 

A9 

00 

95 

02 

CA 

10 

0B08- 

FB 

60 

20 

35 

FD 

85 

14 

20 

0B10- 

DA 

FD 

A5 

14 

60 

C9 

BO 

90 

0B18- 

OA 

C9 

CI 

BO 

06 

29 

OF 

85 

0B20- 

17 

A9 

00 

60 

06 

OB 

26 

OA 

0B28- 

26 

09 

60 

A2 

03 

B5 

08 

95 

0B30- 

04 

CA 

10 

F9 

60 

20 

2B 

OB 

0B38- 

20 

24 

OB 

20 

24 

OB 

20 

00 

0B40- 

08 

4C 

24 

OB 

A9 

96 

85 

08 

0B48- 

4C 

3E 

08 

A5 

09 

DO 

06 

A5 

0B50- 

OA 

DO 

02 

A5 

OB 

60 

A2 

03 

0B58- 

B5 

04 

95 

10 

CA 

10 

F9 

60 

0B60- 

A2 

03 

B5 

10 

95 

04 

CA 

10 

0B68- 

F9 

60 

A9 

00 

85 

09 

A9 

OA 

0B70- 

85 

OA 

4C 

2C 

08 

AO 

00 

B9 

0B78- 

08 

00 

91 

IE 

C8 

CO 

04 

DO 

0B80- 

F6 

60 

AO 

00 

Bl 

IE 

99 

08 

0B88- 

00 

C8 

CO 

04 

DO 

F6 

60 

60 

0B90- 

20 

00 

OB 

20 

OA 

OB 

C9 

AB 

0B98- 

FO 

06 

C9 

AD 

DO 

05 

E6 

03 
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0BA0- 20 

0A 

OB 

C9 

AE 

DO 

08 

A5 

OBAÖ- 15 

DO 

75 

E6 

15 

10 

Fl 

20 

0BB0- 15 

OB 

DO 

25 

A5 

IC 

DO 

21 

0BB8- 20 

35 

OB 

10 

07 

20 

IC 

08 

0BC0- E6 

IC 

10 

DC 

A5 

17 

85 

07 

0BC8- A9 

00 

85 

06 

85 

05 

20 

00 

0BD0- 08 

A5 

15 

FO 

CB 

C6 

16 

30 

0BD8- C7 

EA 

EA 

C9 

C5 

DO 

41 

20 

0BE0- 0A 

OB 

C9 

AB 

FO 

06 

C9 

AD 

0BE8- DO 

05 

E6 

18 

20 

OA 

OB 

20 

0BF0- 15 

OB 

DO 

2C 

A5 

17 

85 

19 

0BF8- 20 

0A 

OB 

20 

15 

OB 

DO 

OD 

0C00- A5 

19 

OA 

OA 

18 

65 

19 

OA 

0C08- 18 

65 

17 

85 

19 

A6 

18 

FO 

0C10- 08 

A5 

19 

49 

FF 

85 

19 

E6 

0C18- 19 

A5 

16 

18 

65 

19 

85 

16 

0C20- 20 

44 

OB 

A5 

03 

FO 

03 

20 

0C28- 7F 

08 

EA 

A9 

00 

85 

07 

20 

0C30- IC 

08 

A5 

16 

FO 

34 

30 

1F 

OC38- 20 

56 

OB 

20 

6 A 

OB 

20 

2B 

0C40- OB 

C6 

16 

FO 

06 

20 

67 

08 

0C48- 18 

90 

F6 

20 

60 

OB 

20 

67 

0C50- 08 

20 

IC 

08 

18 

90 

13 

20 

0C58- 56 

OB 

20 

6 A 

OB 

20 

8 D 

08 

0C60- 20 

IC 

08 

E6 

16 

FO 

03 

18 

0C68- 90 

ED 

A9 

00 

85 

IC 

60 

4A 


* 


7.58 Hexdump Gleitkommaeingabe 


Die Eingabe beginnt mit dem Unterprogramm CLEAR, das alle be¬ 
nötigten Zellen in der Zero-Page löscht, und dem Unterprogramm IN, 
das ein Zeichen vom Tastenfeld liest und in einer Speicherzelle abgelegt. 
Ist dieses Zeichen ein Pluszeichen, dann kann sofort das nächste 
Zeichen gelesen werden. Ist es ein Minuszeichen, so wird der Vorzeichen¬ 
merker der Mantisse VZM = 1 gesetzt. Auch hier kann sofort das 
nächste Zeicher gelesen werden. Wenn dieses Zeichen ein Punkt ist 
dann wird der Dezimalpunktmerker DPM = 1 gesetzt. Trifft dies alles 
nicht zu, dann gibt es noch 3 weitere Möglichkeiten. Wenn es eine Zahl 
ist, dies wird im Unterprogramm DIGIT festgestellt, dann wird diese 
Zahl in die Mantisse übernommen. Der alte Inhalt der Mantisse wird mit 
10 multipliziert (MULTEN) und die neu eingegebene Zahl hinzu 
addiert. Die alte Mantisse wird allerdings zwischengespeichert, denn 
wenn bei dieser Multiplikation mit anschließender Addition ein Über¬ 
trag in das Vorzeichenbit der Mantisse erfolgt (siehe Abbildung 7.51), 
so sind zu viele Stellen eingegeben worden. Dann wird MAXS = 1 
gesetzt und die alte Mantisse wieder übernommen. Dadurch können 
noch Zahlen eingegeben werden, sie werden aber nicht mehr berück¬ 
sichtigt. 

Bleibt die Mantisse positiv, dann wird, wenn der Dezimalpunktmerker 
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DPM = 1 ist, von Dezimalexponenten 1 abgezogen, da es sich um eine 
Stelle hinter dem Komma handelt. 

Jetzt verbleiben noch 2 Möglichkeiten. Ist das Zeichen ein E, so folgt 
die Eingabe des Exponenten. Sind alle Abfragen negativ verlaufen, 
so handelt es sich um ein beliebiges Zeichen, das die Eingabe beendet. 
Dann wird über die Schnittstelle 5 die Normalisierung der Zahl einge¬ 
leitet. 

Dort wird zuerst gefragt, ob die Mantisse Null ist. Wenn ja, dann ist 
eine Null eingegeben worden und die Eingabe ist beendet. Wenn nicht, 
wird die Mantisse normalisiert und, wenn es sich um eine negative 
Zahl handelt, komplementiert. Dazu werden die Unterprogramme aus 
den Gleitkommaprogrammen benutzt. Nach der Eingabe soll die Zahl 
im Akkumulator 2 sein, deshalb wird mit SWAP die Zahl dort 
hingeschrieben. Eine Übersicht über die belegten Zellen und ihre Namen 
zeigt Abbildung 7.59. 


0 

1 

2 

3 

4 

5 

6 

7 




VZM 

X2 

M2 






ACCU2 



8 

9 

A 

B 

C 

^ D 

E 

l 

F 

XI 

Ml 

E 

- REG 




ACCU1 






10 

11 

12 

13 

14 

15 

16 

17 


REG 



IN 

DPM 

DEX 

INZ 

18 

19 

1A 

1B 

IC 

ID 

IE 

1F 

VZE 

EXP 


MAX 

S 



ADR 

L 

ADR 

H 


7.59 Speicherbelegung für die FP Eingabeprogramme 
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Ist der Dezimalexponent Null, so ist auch die Eingabe beendet. Ist er 
kleiner als Null, so ist die Gleitkommazahl zu groß. Sie wird solange 
durch 10 dividiert, bis DEXP = 0 ist. Ist DEXP größer Null, so ist die 
Zahl zu klein, sie wird dann wiederum solange mit 10 multipliziert bis 
DEXP = 0 ist. Damit ist die Eingabe beendet. 

Dieses Beispiel der Eingabe einer Gleitkommazahl zeigt, wie umfang¬ 
reich Eingabeprogramme werden können, wenn alle Möglichkeiten 
berücksichtigt werden sollen. 

Für den Leser sei es überlassen, die Ausgabe einer Gleitkommazahl als 
Programmieraufgabe zu lösen. 

Bei den Unterprogrammen für die Eingabe befinden sich noch 2 Pro¬ 
gramme LOAD und STORE die eine Gleitkommazahl in ACCU2 
über einen Vektor in den Zellen $1E, S1F holen oder wegspeichern. 


7.6 Relocator für Maschinenprogramme 

Möchte man ein bereits im Maschinencode vorliegendes Programm im 
Speicher verschieben, so genügt es nicht, das Programm durch ein 
Verschiebeprogramm an diesen neuen Platz zu speichern, es müssen 
auch alle absoluten Adressen neu festgelegt werden. So ein Programm, 
das verschiebt und Adressen umrechnet soll als Relocator bezeichnet 
werden. 

Hier besteht allerdings eine Schwierigkeit, wenn sich Daten (Text, 
Tabellen usw.) im Programm befinden. Zur Adressenumrechnung 
muß das Programm die Operationscodes entschlüsseln und die Befehls¬ 
länge bestimmen. Nur so kann der nächste Operationscode gefunden 
werden. 

Ist es ein 3-Byte Befehl, und nur diese enthalten absolute Adressen, 
so muß das Programm prüfen, ob diese Adresse umgerechnet werden 
soll. Trifft bei dieser Entschlüsselung das Programm auf ein Daten¬ 
feld, so kann es diese nicht von Befehlen unterscheiden und versucht 
sie ebenfalls zu entschlüsseln und umzurechnen. Dabei kann aber unter 
Umständen die ganze Programmstruktur verändert werden. Im Kapitel 9 
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"Disassemblierung" wird dies noch an Beispielen gezeigt. 

Das Programm benutzt folgende Speicherzellen der Zero-Page: 


RFLAG 

0 

=0 

Verschieben und Umrechnen 



=1 

Nur Verschieben 

TEST1 

1 

LSB 

Untere Grenze für Adressumrechnungen 


2 

MSB 


TEST2 

3 

LSB 

Obere Grenze für Adressumrechnungen 


4 

MSB 


START 

5 

LSB 

Anfang 


6 

MSB 


STOP 

7 

LSB 

Ende des zu verschiebenden 


8 

MSB 

Programms 

OPTR 

9 

LSB 

Zieladresse 


SA 

MSB 


TEMP2 

SD 



NPTR 

SF 


Hilfszellen 

TEMPI 

S11 




Um nun den vorher beschriebenen Konflikt zwischen echten Befehlen 
und Daten zu vermeiden wird vom Programm der Operationscode 
00 (BRK) nicht übertragen. Damit kann man nun Programme mit 
Daten folgendermaßen umsetzen. Mit RFLAG = 1 wird das Programm 
an die neue Stelle geschrieben. Dabei findet keine Umrechnung statt. 
Im Ursprungsprogramm werden alle Daten durch 00 ersetzt und das 
Programm mit Adressumrechnung (RFLAG = 0) verschoben. Dabei 
werden die Nullen nicht übertragen und die schon vorher übertragenen 
Daten bleiben erhalten. Mit folgender Tabelle verschiebt sich das Pro¬ 
gramm selbst von $800 nach S900 

0: 00 , 00 , 08 , F2 , 08 , 00 , 08 , F2 , 08 , 00 , 09 


Das Programm mit Hexdump zeigt Abbildung 7.61. 
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Im Programm wird bei einigen Befehlen die indiziert indirekte 
Adressierung verwendet LDA (OPTR,X). Da das Indexregister Null ist, 
entspricht dies auch einer normalen indirekten Adressierung. Programm 
aus DDJ, April 1977. 


0800 

0800 

0800 

0800 

0800 

0800 


#########*##*########**###*** 
* * 

* PROGRAMM RELOCATOR * 

* FUER 6502 CPU 


0800 


8 

• # 

I 



0800 


9 

.*#**######*#**#*## 

0800 


10 

f 



0800 


11 

1 



0800 


12 

RFLAG 

EPZ 

$0 

0800 


13 

TEST1 

EPZ 

$1 

0800 


14 

TEST2 

EPZ 

$3 

0800 


15 

START 

EPZ 

$5 

0800 


16 

STOP 

EPZ 

$7 

0800 


17 

BEG 

EPZ 

$9 

0800 


18 

OPTR 

EPZ 

$B 

0800 


19 

TEMP2 

EPZ 

$D 

0800 


20 

NPTR 

EPZ 

$F 

0800 


21 

TEMPI 

EPZ 

$11 

0800 


22 

9 



0800 


23 

9 



0800 

A205 

24 

BEGIN 

LDX 

#$5 

0802 

B505 

25 

S10 

LDA 

START,X 

0804 

950B 

26 


STA 

OPTR,X 

0806 

CA 

27 


DEX 


0807 

10F9 

28 


BPL 

S10 

0809 

E8 

29 


INX 


080A 

A500 

30 

MOVE 

LDA 

RFLAG 

080C 

F006 

31 


BEQ 

M01 

080E 

204F08 

32 


JSR 

MOV 1 

0811 

4C6008 

33 


JMP 

DONE? 

0814 

AI OB 

34 

M01 

LDA 

(OPTR,X) 

0816 

A8 

35 


TAY 


0817 

D006 

36 


BNE 

M02 

0819 

205308 

37 


JSR 

SKIP 

081C 

4C6008 

38 


JMP 

DONE? 

081F 

204F08 

39 

MO 2 

JSR 

MOV 1 

0822 

98 

40 

TSTJS.R 

TYA 


0823 

C920 

41 


CMP 

#$20 

0825 

D003 

42 


BNE 

BYTE1 

0827 

4C7A08 

43 


JMP 

BYTE3 

082A 


44 

;TEST 

FOR 1 

1 BYTE INI 

082A 

98 

45 

BYTE1 

TYA 


082B 

299F 

46 


AND 

#$9F 

082D 

F031 

47 


BEQ 

DONE? 

082F 

98 

48 


TYA 


0830 

291D 

49 


AND 

#$1D 

0832 

C908 

50 


CMP 

#$8 

0834 

F02A 

51 


BEQ 

DONE? 

0836 

C918 

52 


CMP 

#$18 

0838 

F026 

53 


BEQ 

DONE? 

083A 


54 

;TEST 

FOR 3 BYTE IN: 

083A 


55 

i 



08?A 

98 

56 


TYA 


083B 

291C 

57 


AND 

#$1C 

083D 

C91C 

58 


CMP 

#$1C 

083F 

F039 

59 


BEQ 

BYTE3 

0841 

C918 

60 


CMP 

#$18 

0843 

F035 

61 


BEQ 

BYTE3 


;CHECK FOR DATA MOVE 


INSTRUCTION 
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0845 

C90C 

62 


CMP //$0C 

0847 

F031 

63 


BEQ BYTE3 

0849 


64 

9 


0849 


65 

;REM£INING 2 BYTE INSTRUCTIONS 

0849 


66 



0849 

204F08 

67 


JSR MOV 1 

084C 

4C6008 

68 


JMP DONE? 

084F 


69 

; MOVE 

1 BYTE 

084F 


70 

| 


084F 

AI OB 

71 

M0V1 

LDA (OPTR,X) 

0851 

810F 

72 


STA (NPTR,X) 

0853 

20DA08 

73 

SKIP 

JSR IOPTR 

0856 

20E108 

74 


JSR INPTR 

0859 

60 

75 


RTS 

085A 


76 

i 


085A 


77 

;MOVE 

2 BYTES 

085A 


78 

9 


085A 

204F08 

79 

M0V2 

JSR M0V1 

085D 

204F08 

80 


JSR M0V1 

0860 

A50B 

81 

DONE? 

LDA OPTR 

0862 

8511 

82 


STA TEMPI 

0864 

A50C 

83 


LDA OPTR+1 

0866 

8512 

84 


STA TEMP1+1 

0868 

A507 

85 


LDA STOP 

086A 

850D 

86 


STA TEMP2 

086C 

A508 

87 


LDA STOP+1 

086E 

850E 

88 


STA TEMP2+1 

0870 

20CF08 

89 


JSR TEST 

0873 

9095 

90 


BCC MOVE 

0875 

F093 

91 


BEQ MOVE 

0877 

00 

92 


BRK 

0878 

EA 

93 


NOP 

0879 

EA 

94 


NOP 

087 A 


95 

5 


087A 


96 

;3 BYTE INSTRUCTIONS 

087A 


97 

» 


087A 

AI OB 

98 

BYTE3 

LDA (OPTR,X) 

087 C 

8511 

99 


STA TEMPI 

087E 

20DA08 

100 


JSR IOPTR 

0881 

AI OB 

101 


LDA (OPTR,X) 

0883 

8512 

102 


STA TEMPI+1 

0885 

20E808 

103 


JSR DOPTR 

0888 

A501 

104 


LDA TEST1 

088A 

850D 

105 


STA TEMP2 

088C 

A502 

106 


LDA TEST1+1 

088E 

850E 

107 


STA TEMP2+1 

0890 

20CF08 

108 


JSR TEST 

0893 

F002 

109 


BEQ BIO 

0895 

90C3 

110 


BCC M0V2 

0897 

A503 

111 

BIO 

LDA TEST2 

0899 

850D 

112 


STA TEMP2 

089B 

A504 

113 


LDA TEST2+1 

089D 

850E 

114 


STA TEMP2+1 

089F 

20CF08 

TI 5 


JSR TEST 

08A2 

F002 

116 


BEQ B20 

08A4 

B0B4 

117 


BCS M0V2 

08A6 


118 

> 


08A6 


119 

;ADDRESS RECOMPUTATION 

08A6 


120 



08A6 

38 

121 

B20 

SEC 

08A7 

AI OB 

122 


LDA (OPTR,X) 

08A9 

E505 

123 


SBC START 

08AB 

850D 

124 


STA TEMP2 

08AD 

20DA08 

125 


JSR IOPTR 

08B0 

AI OB 

126 


LDA (OPTR,X) 

08B2 

E506 

127 


SBC START+1 

08B4 

850E 

128 


STA TEMP2+1 

08B6 

20DA08 

129 


JSR IOPTR 

08B9 

18 

130 


CLC 


129 






08BA 

A50D 

131 

LDA 

TEMP2 

08BC 

6509 

132 

ADC 

BEG 

08BE 

81 OF 

133 

STA 

(NPTR,X) 

08C0 

20E108 

134 

JSR 

INPTR 

08C3 

A50E 

135 

LDA 

TEMP2+1 

08C5 

650A 

136 

ADC 

BEG+1 

08C7 

81 OF 

137 

STA 

(NPTR,X) 

08C9 

20E108 

138 

JSR 

INPTR 

03CC 

4C6008 

139 

JMP 

DONE? 


08CF 

08CF 

08CF 


140 

141 

142 


TEST COMPARES 2 ADDRESSES 


08CF 

A512 


143 

TEST 

LDA TEMPI+1 

08D1 

C50E 


144 



CMP TEMP2+1 

08D3 

D004 


145 



BNE TI 0 

08D5 

A511 


146 



LDA TEMPI 

08D7 

C50D 


147 



CMP TEMP2 

08D9 

60 


148 

TI 0 

RTS 

08DA 



149 

t 



08DA 



150 

;INCREMENT OLD POINTER 

08DA 



151 

> 



08DA 

E60B 


152 

IOPTR 

INC OPTR 

08DC 

D002 


153 



BNE INC 10 

08DE 

E60C 


154 



INC OPTR+1 

08E0 

60 


155 

INC 10 

RTS 

08E1 



156 




08E1 



157 

;INCREMENT NEW POINTER 

08E1 



158 

» 



08E1 

E60F 


159 

INPTR 

INC NPTR 

08E3 

D002 


160 



BNE INC20 

08E5 

E610 


161 



INC •NPTR+1 

08E7 

60 


162 

INC20 

RTS 

08E8 



163 

> 



08E8 



164 

:DECREMENT OLD POINTER 

08E8 



165 

. 



08E8 

C60B 


166 

DOPTR 

DEC OPTR 

08EA 

A50B 


167 



LDA OPTR 

08EC 

C9FF 


168 



CMP #$FF 

08EE 

D002 


169 



BNE Dl0 

08F0 

C60C 


170 



DEC OPTR+1 

08F2 

60 


171 

Dl 0 

RTS 




172 



END 

0800 - 

- A2 

05 

B5 05 

95 

OB 

CA 10 

0808 - 

- F9 

E8 

A5 00 

FO 

06 

20 4F 

0810 - 

- 08 

4C 

60 08 

AI 

OB 

A8 DO 

0818 - 

- 06 

20 

53 08 

4C 

60 

08 20 

0820 - 

- 4F 

08 

98 C9 

20 

DO 

03 4C 

0828 - 

- 7A 

08 

98 29 

9F 

FO 

31 98 

0830 - 

- 29 

ID 

C9 08 

FO 

2A 

C9 18 

0838 - 

- FO 

26 

98 29 

IC 

C9 

IC FO 

0840- 

- 39 

C9 

18 FO 

35 

C9 

OC FO 

0848- 

- 31 

20 

4F 08 

4C 

60 

08 AI 

0850- 

- OB 

81 

OF 20 

DA 

08 

20 El 

0858- 

- 08 

60 

20 4F 

08 

20 

4F 08 

0860 - 

- A5 

OB 

85 11 

A5 

OC 

85 12 

0868 - 

- A5 

07 

85 OD 

A5 

08 

85 OE 

0870 - 

- 20 

CF 

08 90 

95 

FO 

93 00 

0878 - 

- EA 

EA 

AI OB 

85 

11 

20 .DA 

0880 - 

- 08 

AI 

OB 85 

12 

20 

E8 08 

0888 - 

- A5 

01 

85 OD 

A5 

02 

85 OE 

0890 - 20 

CF 

08 FO 

02 

90 

C3 A5 

0898- 

- 03 

85 

OD A5 

04 

85 

OE 20 

08A0- 

- CF 

08 

F-0 02 

BO 

B4 

38 AI 

08A8- 

- OB 

E5 

05 85 

OD 

20 

DA 08 

08B0- 

- AI 

OB 

E5 06 

85 

OE 

20 DA 

08 b8 - 

- 08 

18 

A5 OD 

65 

09 

81 OF 
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08C0- 20 El 08 A5 OE 65 OA 81 

08C8- OF 20 El 08 4C 60 08 A5 

O8D0- 12 C5 OE DO 04 A5 11 C5 

08D8- OD 60 E6 OB DO 02 E6 OC 

08E0- 60 E6 OF DO 02 E6 10 60 

08E8- C6 OB A5 OB C9 FF DO 02 

08F0- C6 OC 60 

# 


7.61 Programm und Hexdump RELOCATOR 


7.7 Nützliche Tips und Unterprogramme 

In diesem Abschnitt werden in bunter Folge einige Programmiertips 
und -tricks und nützliche Unterprogramme beschrieben. 

Soll der Inhalt zweier Zellen daraufhin untersucht werden, ob dieser 
in beiden Zellen Null ist, so kann dies auf einfache Weise mit der 
ODER-Funktion geschehen. 

LDA ZELLEI 
ORA ZELLE2 
BEQ WEITER 


Nur wenn in beiden Zellen kein Bit 1 war, ist die BEQ-Bedingung er¬ 
füllt. 

Die 6502 CPU hat nur einen indirekten Befehl: 

JMP (ADR), wobei ADR eine Adresse in der Zero-Page ist. Benötigt 
man aber einen indirekten Sprung in ein Unterprogramm, aus dem man 
mit RTS im Hauptprogramm weitermachen möchte, so kann dies mit 
folgender Befehlsfolge geschehen. Irgendwo im Programm steht der 
Befehl 

JUMPI JMP (ADR) 

Soll nun ein indirekter Sprung in ein Unterprogramm durchgeführt 
werden, so wird dessen Adresse nach ADR, ADR + 1 geschrieben und 
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im Programm ein JSR JUMPI aufgerufen. Das RTS führt dann auf den 
Befehl nach dem JSR zurück. 

Im ATARI-Monitor findet man folgende Programmfolge für die Aus¬ 
führung eines indirekten Sprunges 

LDA #ADRL 
PHA 

LDA #ADRH 

PHA 

RTS 


Die Adresse ADRL, ADRH wird mit PHA auf den Stapelspeicher ge¬ 
schrieben. Der Befehl RTS holt von dort seine Rücksprungadresse, so 
daß damit ein indirekter Sprung nach ADRL + 1 und ADRH ausge¬ 
führt wird. Wie schon in Abbildung 5.13 gezeigt, wird bei einem JSR 
nicht die Adresse des nächsten Befehls sondern die vorangehende 
Adresse im Stapel abgelegt. 


Für Testzwecke benötigt man oft die Ausgabe des Inhalts einer oder 
mehrerer Speicherzellen als 2 stellige Hexadezimalzahl. Da im Monitor 
oft nur ein Unterprogramm für die Ausgabe eines ASCII-Zeichens vor¬ 
handen ist, kann dies mit folgendem Unterprogramm geschehen (ent¬ 
nommen dem KIM-Monitor). Das auszugebende Byte wird im Akku¬ 
mulator an das Unterprogramm übergeben und ist nach Verlassen der 
Routine wieder im Akkumulator. 


0800 


2 




0800 


3 




0800 


4 




0800 


5 

. • 



0800 


6 

;« AUSGABE EINES BYTES ALS 


0800 


7 

:» ALS 2 HEXZAHLEN 


0800 


8 

• « 



0800 


9 




0800 


10 




0800 


11 

OUTCH 

EQU $FDED 


0800 


12 



0800 


13 




0800 

8D2208 

14 

PRTBYT 

STA SAVE 


0803 

4A 

15 


LSR 


08011 

4A 

16 


LSR 


0805 

4A 

17 


LSR 


0806 

HA 

18 


LSR 


0807 

201408 

19 


JSR HEXTA 
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080A 

AD2208 

20 


LDA 

SAVE 


080D 

201408 

21 


JSR 

HEXTA 


0810 

AD2208 

22 


LDA 

SAVE 


0813 

60 

23 


RTS 



0814 


24 

j 




0814 


25 

i 




0814 

290F 

26 

HEXTA 

AND 

#$0F 

; OBEREN 4 BIT AUSBLENDEN 

0816 

C90A 

27 


CMP 

#$0A 

;GROESSER 9? 

0818 

18 

28 


CLC 



0819 

3002 

29 


BMI 

HEXTA1 


081B 

6907 

30 


ADC 

#$07 


081D 

69B0 

31 

HEXTA1 

ADC 

#$B0 

;NUR APPLE, SONST $30 

081F 

4CEDFD 

32 


JMP 

OUTCH 


0822 


33 

s 




0822 

00 

34 

SAVE 

HEX 

00 




35 


END 




7.71 Programm PRTBYT 


Das folgende Programm ist ein Speichertest. Nacheinander werden die 
Bitmuster % 1 0 1 0 1 0 1 0 und % 0 1 0 1 0 1 0 1 in eine Speicher¬ 
zelle geschrieben und wieder ausgelesen. Wird dabei ein Unterschied 
festgestellt, so weist diese Zelle einen Hardwarefehler auf. Das Pro¬ 
gramm wird dann mit einem BRK-Befehl abgebrochen. Die Adresse 
der schadhaften Zelle ist dann in den Adressen $00 und $01 zu finden. 
Der Speichertest beginnt erst oberhalb des Stapels bei Adresse $200. 
Befindet sich ein Programm im Speicher, so wird dieses nicht zerstört, 
da der Zelleninhalt vor einem Text in der Zelle $03 gerettet und an¬ 
schließend zurückgeschrieben wird. Nur der Inhalt der Zero-Page- 
zellen $00 bis $36 geht verloren. 


0800 

0800 

0800 


2 ; 

3 ; 

4 . ftftftftftftftftftffftftftftftft«« 

0800 

0800 


5 ;« 

6 :« SPEICHERTEST 

0800 

0800 


7 ;* 

8 ;«**** 



0800 

0005 


9 ; 

10 

ORG 

$05 

0005 


11 

OBJ 

$0800 

0005 

0005 

A000 

12 ; 

13 TEST 

LDY 

#$00 

0007 

8400 

14 

STY 

$00 

0009 

A902 

15 

LDA 

#$02 

000B 

8501 

16 

STA 

$01 

000D 

Bl 00 

17 TST1 

LDA 

($00),Y 

000F 

8503 

18 

STA 

$03 

0011 

A9AA 

19 

LDA 

#$AA 

0013 

8502 

20 

STA 

$02 

0015 

9100 

21 

STA 

($00),Y 

0017 

Bl 00 

22 

LDA 

($00),Y 

0019 

C502 

23 

CMP 

$02 


« 

ft 

ft 

K ft ft ft 
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001B 

D019 

24 

00 ID 

A955 

25 

001F 

8502 

26 

0021 

9100 

27 

0023 

Bl 00 

28 

0025 

C502 

29 

0027 

D00D 

30 

0029 

A503 

31 

002B 

9100 

32 

002D 

E600 

33 

002F 

D002 

34 

0031 

E601 

35 

0033 

18 

36 

0034 

90D7 

37 

0036 

00 

38 

0037 


39 


40 



BNE 

FIN 


LDA 

#$55 


STA 

$02 


STA 

($00),Y 


LDA 

($00),Y 


CMP 

$02 


BNE 

FIN 


LDA 

$03 


STA 

($00),Y 


INC 

$00 


BNE 

TST2 


INC 

$01 

TST2 

CLC 



BCC 

TST1 

FIN 

BRK 



END 


7.72 Speichertest 


Das nächste Programm erzeugt Zufallszahlen und Zufallsbuchstaben. 
Der Programmteil Zufallszahlen ist dem "First Book of KIM" ent¬ 
nommen. Im Programmteil Zufallsbuchstaben wird durch ZUFA eine 
Zufallszahl erzeugt und verglichen ob diese kleiner A (beim APPLE: 
SCI) oder größer Z (beim APPLE: SDB) ist. Wenn dies nicht der Fall 
ist, so wird die Zahl als ASCII-Zeichen ausgegeben. Durch Verändern 
der Startwerte in den Zellen $10 bis S15 werden andere Zufallsbuch¬ 
staben erzeugt. 


0800 


2 

| 



0800 


3 

9 



0800 


4 


0800 


5 

. « 
y 



0800 


6 

. « 
y 

ZUFALLSBUCHSTABEN 


0800 


7 

. ft 

, 



0800 


8 

9 



0800 


9 

I 



0800 


10 

9 



0800 


11 

OUTCH EQU $FDED 


0800 


12 

1 



0800 

205008 

13 

TEST JSR ZUFA 


0803 

C9C1 

14 


CMP #$C1 


0805 

90F9 

15 


BCC TEST 


0807 

C9DB 

16 


CMP #$DB 


0809 

B0F5 

17 


BCS TEST 


080B 

20EDFD 

18 


JSR OUTCH 


080E 

18 

19 


CLC 


080F 

90EF 

20 


BCC TEST 


0811 


21 




0811 


22 

• 

9 



0811 


23 

9 



0811 


24 

9 



0811 


25 

;* 



0811 


26 

;» 

ZUFALLSZAHLEN 


0811 


27 

y 



0811 


28 

; #1 



0811 


29 

y 



0850 


30 


ORG $850 
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0850 


31 

t 



0850 


32 

ZAHL 

EPZ 

$10 

0850 


33 

j 


0850 

38 

34 

ZUFA 

SEC 


0851 

A511 

35 


LDA 

ZAHL+1 

0853 

6514 

36 


ADC 

ZAHL+4 

0855 

6515 

37 


ADC 

ZAHL+5 

0857 

8510 

38 


STA 

ZAHL 

0859 

A204 

39 


LDX 

#$04 

085B 

B510 

40 

ZU1 

LDA 

ZAHL,X 

085D 

9511 

41 


STA 

ZAHL+1,X 

085F 

CA 

42 


DEX 


0860 

10F9 

43 


BPL 

ZU1 

0862 

60 

44 


RTS 


0863 


45 

t 





46 


END 


***** END 0F 

ASSEMBLY 




7.73 Zufallsbuchstaben 


7.8 Zeitprobleme 

In den meisten Fällen ist die Ausführungszeit von Programmen in 
Maschinencode sehr kurz, so daß keine besonderen Programmierkniffe 
angewendet werden müssen, um diese noch weiter zu verkürzen. 

Dies soll jedoch auch an einem Beispiel gezeigt werden: 

Mit einem 8-bit Digital-Analog Wandler soll durch ein Programm eine 
8-bit Analog-Digital Wandlung ausgeführt werden. 



SPANNUNG 

7.81 Blockschaltbild Digital-Analog Wandlung 


Ein Digital-Analog Wandler setzt eine Zahl, die an seinem Eingang an¬ 
liegt, in einen Spannungswert um. Dieser Spannungswert wird durch 
einem Komparator mit der Eingangsspannung verglichen. Ist die 
Eingangsspannung größer als die Vergleichsspannung, so muß sie ver¬ 
kleinert werden. Vom Rechner wird die Zahl über ein Tor (siehe Kapitel 
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10) ausgegeben, über ein zweites Tor wird der Ausgang des Komparators 
von Rechner gelesen. Das Blockschaltbild einer solchen Wandel¬ 
schaltung zeigt Abbildung 7.81. 

Der Analog-Digital Wandler soll eine Ausgangsspannung von 0 bis 5 
Volt besitzen. Wird an den Eingang 800 gelegt, so soll die Ausgangs¬ 
spannung 0 Volt, mit SFF am Eingang soll die Ausgangsspannung 5 
Volt sein. 

Das Verfahren der Digital-Analog Wandlung läuft nun so ab, daß zuerst 
eine mittlere Spannung von 2,5 Volt, dies entspricht 880 am Eingang, 
mit der Eingangsspannung verglichen wird. Ist die Eingangsspannung 
größer, so wird dieser Spannungswert beibehalten und die Hälfte 
(1,25 Volt) hinzu addiert. 880 + 840 ergibt SCO = 3.75 Volt. Ist die 
Eingangsspannung kleiner, so wird der Spannungswert halbiert und die 
Eingangsspannung damit verglichen. Auf diese Weise wird die Eingangs¬ 
spannung in einen Zahlenwert umgewandelt. Bei den angegebenen 
Daten werden die 5 Volt mit einem Fehler von — 20 mV aufgelöst. 


Für viele Fälle ist es nun vorteilhaft, wenn diese Analog-Digital Wand¬ 
lung in einer möglichst kurzen Zeit durchgeführt wird. 

An dieser Stelle ist es sinnvoll ein Programm auf seine Ausführungs¬ 
zeit zu untersuchen. Im Anhang sind bei den Operationscodes auch die 
Befehlszeiten in Maschinenzyklen angegeben. Bei einer Taktfrequenz 
von 1 MHz entspricht 1 Maschinenzyklus einer Mikrosekunde. Bei den 
Verzweigungsbefehlen muß, wenn die Verzweigungsbedingung erfüllt 
ist, noch ein Maschinenzyklus addiert werden. 

Im Programm ADW1 (Abbildung 7.82) wird der normale Dienstweg 
beschritten. Als Zählregister wird das Indexregister X benutzt. 880 
wird in einer Hilfszelle Z gespeichert und an das Tor A ausgegeben. Der 
Ausgang des Komparators wird über Bit 0 von Tor B eingelesen. Bit 
0 ist 1, wenn die Eingangsspannung größer ist, als die Vergleichs¬ 
spannung. Dann wird die Hälfte der verbleibenden Spannung dem 
augenblicklichen Wert hinzu addiert und ein neuer Vergleich durch¬ 
geführt. Ist dabei die Verglichsspannung zu groß, wird dieser Wert 
wieder abgezogen. 
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Programm ADW1 


LDX #308 

LDA #380 

STA Z 

2 

2 

3 7 

7 

MO STA TORA 

LDA TORB 

AND #S01 

BEQ Ml 

4 

4 

2 

2+1 13 

12 

M2 LSR Z 

CLC 

LDA TORA 

ADC Z 

DEX 

BNE MO 

5 

2 

4 

3 

2 

2+1 19 

19 

RTS 

6 6 

6 

Ml SEC 

LDA TORA 

SBC Z 

CLC 

BCC M2 

2 

4 

3 

2 

2 + 1 13 



Maximale Wandelzeit: 8 x 45 = 360 

+ 13 = 373 ms 

Minimale Wandelzeit: 8x31= 248 

+ 13 = 261ms 

7.82 Programm ADW1 


Addiert man nun die Maschinenzyklen, so erhält man für die längste 
Schleife 45 Zyklen, für die kürzeste Schleife 31 Zyklen. Beide Schleifen 
werden 8 mal durchlaufen, sodaß dafür eine Maximalzeit von 360 jus 
und eine Minimalzeit von 248 jus erreicht wird. Dazu kommen noch 13 
jus für das Setzen der Zellen am Anfang und für das RTS. 

Dies ergibt eine mittlere Wandelzeit von 317 jus. Beim Programm 
ADW2 in Abbildung 7.83 wird nun durch Programmiertricks versucht, 
die Ausführungszeit zu verkürzen. Auf der Hardwareseite wird der 
Komparator nicht durch Bit 0 sondern durch Bit 7 von Tor B abge¬ 
fragt. Dadurch kann das Ausblenden wegfallen und mit BPL oder 
BMI verzweigt werden. Das X-Register kann als Zählregister eben- 
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falls entfallen, denn wenn durch Linksschieben des Inhaltes von Z das 
Carry Bit gesetzt wird, dann ist die Umwandlung beendet. Der erste 
Vergleich wird mit S7F ausgeführt. Ist die Eingangsspannung größer 
dann wird mit ORA Z Bit 7 gesetzt. Mit EOR Z wird Bit 6 gelöscht, 
sodaß der nächste Vergleich mit SBF durchgeführt wird. 


Die Maximalzeit ist hierfür 221 ßs, die Minimalzeit 215 ßs, und somit 
die mittlere Wandelzeit 218 ßs. 

Durch geschickte Programmierung kann durchaus Rechenzeit eingespart 
werden. 


Programm ADW2 


LDA #880 

STA Z 

LDA #87 F 

2 

3 

2 7 

7 

MO STA TORA 

LDY TORB 

BPL Ml 

4 

4 

2 + 1 11 

10 

ORA Z 

3 


Ml LSR Z 

BCS FIN 

EOR Z 

BCC MO 

5 

2 + 1 

3 

3 13 

16 

FIN RTS 

6 

6 


Maximale Wandelzeit: 8 x 26 = 208 

+ 13 = 221 ßs 

Minimale Wandelzeit: 8 x 24 = 192 

+ 13 = 215 ßs 

7.83 Programm ADW2 
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6502-Systeme 


8.0 6502 Systeme 

Die meisten der sogenannten Heim- oder Personalcomputer enthalten 
als CPU-Baustein den 6502. Der erste Einplatinencomputer, der Ahn¬ 
vater dieser Familie, der auf den Markt kam, war der KIM 1. Durch die 
Verwendung eines normalen Kassettenrecorders mit handelsüblichen 
Tonkassetten zur Speicherung von Programmen stellte er den ersten 
kompletten Rechner zu einem sagenhaft niedrigen Preis dar. Bald 
darauf folgte als erster richtiger Computer mit Bildschirm und Tasta¬ 
tur bei den 6502 Systemen der PET und der APPLE I. Bei den Ein¬ 
platinencomputern folgten der SYM, AIM 65, während PET sich 
zum CBM und APPLE I sich zum APPLE II erweiterte. Daneben 
entstanden die C1P bis C4P Systeme von Ohio Scientific. Nach dem 
APPLE III folgten nun als jüngste Kinder, die ATARI-Rechner 400 
und 800 und der VC20 von Commodore. Auf einige dieser Systeme 
und ihre Eigenheiten bei der Programmierung in Maschinensprache 
soll nun eingegangen werden. 


8.1 Der APPLE II-Computer 

Bei diesem System werden zwei Assembler vorgestellt. Einmal der 
Miniassebier des Monitors und zweitens der Makro-Assembler des 
PASCAL-Systems. 


8.11 Miniassembler des APPLE Il-Computers 

In Verbindung mit INTEGER BASIC und MONITOR verfügt der 
APPLE Il-Computer über einen Miniassembler, der eine direkte Eingabe 
von Assemblerbefehlen ermöglicht. Die Befehle werden sofort ent¬ 
schlüsselt und gespeichert. Fehlermeldungen werden bei falscher Ein¬ 
gabe ausgegeben. Dieser Miniassembler kennt keine symbolischen 
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Namen. Die Adressenangabe bei Verzweigungsbefehlen erfolgt durch 
Angabe der absoluten Adresse. Diese ist nur bei Rückwärtsverzweig¬ 
ungen bekannt. Für Vorwärtsverzweigungen hilft man sich mit einem 
Trick. Man gibt eine fiktive Adresse an und ändert diese am Ende des 
Programms durch die richtigen Adressen ab. 


Arbeitsablauf: 

Aus Integer-BASIC mit CALL-151 in den Monitor, danach F666G. 
Als Kennzeichen erscheint am linken Rand des Bildschirms ein Ausrufe¬ 
zeichen ( ! ). Nun wird die Startadresse, gefolgt von einem Doppel¬ 
punkt und der erste Assembler-Befehl eingegeben. Dieser wird bei 
Betätigen der RETURN-Taste übersetzt, die Adresse mit den Bit¬ 
mustern ausgegeben und die Eingabe der nächsten Zeile durch ein 
Ausrufezeichen angezeigt. 


Dabei braucht nun die Adresse nicht mehr angegeben werden, sie ist 
vom Rechner schon bestimmt worden. Die Eingabe einer Befehlszeile 
muß aber mit einem Leerzeichen beginnen. Abbildung 8.1 zeigt den 
Ausdruck des Bildschirms bei einer Programmierung mit dem Mini¬ 
assembler. 


*F666G 




0900- 

A9 00 

LDA 

#$ 00 

0902- 

85 10 

STA 

$10 

0904- 

A8 

TAY 


0905- 

C8 

INY 


! STA 

(1000),Y 



! STA 

(1000,Y) 



0906- 

8D 00 10 

STA 

$1000 

0909- 

99 00 10 

STA 

$1000,Y 
($10),Y 

090C- 

Bl 10 

LDA 

090E- 

C0 FF 

CPY 

#$FF 

0910- 

DO F3 

BNE 

$0905 

0912- 

EA 

N0P 


0913- 

EA 

N0P 


0914- 

EA 

NOP 


0915- 

A2 10 

LDX 

wo 

0917- 

81 10 

STA 

($10,X) 


! 


8.1 Miniassembler APPLE II 

Besonderheiten: 

Die Adressangabe wird immer als Hex-Zahl interpretiert, deshalb 
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braucht kein $—Zeichen vorangestellt werden. 

Bei fehlerhafter Eingabe piepst er und der Cursor zeigt auf die Stelle, 
bei der ein Fehler entdeckt wurde. Der Ausstieg aus dem Miniassembler 
erfolgt entweder durch Reset oder durch ! SFF69G. 


8.12 Der Makro-Assembler des PASCAL-Systems 

Der Makro-Assembler des PASCAL-Systems dient hauptsächlich dazu, 
Maschinenprogramme in PASCAL einzubinden. Er verlangt deshalb vor 
dem Assemblerprogramm die Angabe, ob es such um eine Prozedur 
oder eine Funktion handelt, den Namen dieser Prozedur oder dieser 
Funktion und die Zahl der zu übergebenden Parameter. Wird der 
Assembler nur allein benötigt, wird vor dem Programm die Angabe 
PROC< NAME) verlangt. 

Der Assembler kennt folgende Pseudocodes. Für die Schreibweise 
wollen wir folgende Vereinbarung treffen. Eine Angabe in spitzen 
Klammern < > muß erfolgen, eine Angabe in eckigen Klammern [ ] 
braucht nicht unbedingt gemacht werden. 


[ MARKE ] . ASCII "{ZEICHEN >" 

Beispiel: TEXT .ASCII "NEUE EINGABE" 

Diese Anweisung speichert die angegebenen Zeichen ab. 

[ MARKE ] .BYTE [ WERTELISTE ] 

Beispiel: .BYTE 3 

Damit wird für die Hexadezimalzahl 03 Speicherplatz reserviert. Wird 
kein Wert angegeben, so wird 00 abgespeichert. 

Sollen mehrere verschiedene Byte reserviert werden, so sind diese durch 
Komma zu trennen. Beispiel: .BYTE 1,2,3,4 

Bei der Ausgabe von Zahlen weicht dieser Assembler von der normalen 
Konvention ab, Hexadezimalzahlen durch ein S-Zeichen zu kenn¬ 
zeichnen. Eine Zahl beginnt immer mit einer Ziffer. Beginnt eine Hexa¬ 
dezimalzahl mit einem Buchstaben, so wird eine Null vorangestellt. 

OFF FF entspricht SFFFF oder 
0A9 entspricht SA9. 

Soll eine Dezimalzahl angegeben werden so wird die Zahl, gefolgt von 
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einem Punkt geschrieben: 


25. entspricht 25 Dezimal. 

[ MARKE ] .BLOCK < LÄNGE > [, WERT ] 

Beispiel: PLATZ .BLOCK 5,2 

Damit werden ab der Adresse PLATZ 5 Byte mit dem Inhalt 02 
reserviert. 

[ MARKE ] .WORD (WERTELISTE) 

Beispiel: .WORD 4,3,2,1 

Ein Wort ist in PASCAL immer eine 16-bit Binärzahl. Deshalb wird die 
angegebene Werteliste als 

0004 

0003 

0002 

0001 gespeichert. 


(MARKE) .EQU (ADRESSE) 

Beispiel: TORA .EQU 0C0C0 

Die EQUATE-Anweisung weist, wie schon besprochen Adressen sym¬ 
bolische Namen zu. Diese Adresse kann auch ein schon vorher ver¬ 
einbarter symbolischer Name sein. 


.ORG (WERT) 

Beispiel: .ORG 0A00 

Die ORG-Anweisung hat hier eine andere Bedeutung. Sie gibt nicht 
die absolute Adresse für den Maschinencode an, sondern den Abstand 
zum Beginn des assemblierten Programms. Dies kann durch die Pseudo¬ 
anweisung 

.ABSOLUTE 

geändert werden. Dann werden alle .ORG-Anweisungen als absolute 
Adressen interpretiert. Die .ABSOLUTE Anweisung muß vor dem 
ersten .PROC erfolgen und gilt für die gesamte Assemblierung. 

.END 

Diese Pseudoanweisung beendet den Assemblertext. 
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Makrodefinition: 


.MACRO < NAME > 

< TEXT) 

.ENDM 

Mit der Anweisung .MACRO < NAME ) beginnt die Definition eines 
Makros. Dies ist Assemblertext der unter seinem Namen in anderen 
Assemblertexten aufgerufen werden kann. Die Definition eines Makros 
kann vor der Vereinbarung .PROC erfolgen. Ein Makro wird immer 
dann verwendet, wenn eine Befehlsfolge in Assemblerschreibweise sich 
an vielen Stellen des Programms wiederholt. 

Dazu ein Beispiel: 

Bei der Verarbeitung von Tabellen und Listen muß häufig der augen¬ 
blickliche Wert einer Adresse mit einer Endadresse verglichen werden. 
Dazu benutzt man folgende Befehlsfolge: 

LDA WERTH 
CMP ENDH 
BCC FIN 
BEQ F 
BCS FIN 
F LDA WERTL 
CMP ENDL 
FIN NOP 

Tritt diese Abfrage sehr häufig im Programm auf, so wird man daraus 
einen Makro machen. 

.MACRO VGL 
LDA %1 
CMP %2 
BCC 82 
BEQ 81 
BCS 82 

81 LDA %3 
CMP %4 

82 NOP 
.ENDM 
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%1, %2, %3 und %4 sind Definitionsnamen, deren eigentlicher Wert 
bei Aufruf des Makros bestimmt wird. 

81 und S2 sind lokale Sprungmarken. Diese sind nur innerhalb eines 
Makroaufrufes bekannt. 

Muß im Assemblertext dieser Vergleich durchgeführt werden, so wird 
der Makro durch 


STA LISTE 

VGL WERTH, ENDH, WERTL, ENDL 
BCC WEITER 


aufgerufen. An dieser Stelle wird der definierte Text eingefügt und die 
in der Parameterliste angegebenen Namen den Definitionsnamen der 
Reihe nach zugewiesen. Innerhalb einer Makrodefinition kann ein 
anderer Makro aufgerufen, aber kein neuer definiert werden. 


Dies wird in dem Programm MAKRODEMO in den Abbildungen 8.2 und 
8.3 gezeigt. 

Abbildung 8.2 zeigt den Text des Beispiels, wie er mit dem Texteditor 
des PASCAL-Systems geschrieben wurde. Es gilt hier die Vereinbarung, 
daß Marken immer an der ersten Stelle der Textzeile beginnen müssen. 
Bei Assemblerbefehlen muß die erste Zeile immerein Leerzeichen sein. 


.MACRO LOP 
LDY #11 
LDX #$2 
$1 DEY 

BNE $1 
DEX 
BNE $1 
. ENDM 

!macro LUP 

LDA H 1 
STA H 

$1 LDA #12 

STA Hl 

$2 LOP $3,$4 

STA SPKR 
DEC Hl 
BNE $2 
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DEC H 
BNE $1 
. ENDM 

•’pROC TON 
.EQU 0C030 
.EQU 10 
.EQU 11 

LUP 10,40,80,01 
LUP 10,40,OFF,01 

!end 

8.2 Text Makrodemo 


SPKR 

H 

Hl 


In dem Programm ist in dem Makro LOP eine Zeitschleife program¬ 
miert. Als Sprungmarke wird eine lokale Sprungmarke benutzt. Diese 
beginnt mit einem S-Zeichen, darauf können bis zu 8 Zahlen folgen. 
Eine lokale Marke ist nur innerhalb eines Makros bekannt. Würde man 
hier globale Marken (z. B. L oder L20) definieren, würde dies beim 
Assemblieren dann zu einem Fehler führen, wenn der Makro ein zweites 
Mal aufgerufen wird. 


Der 2. Makro LUP ist ebenfalls eine Zeitschleife. In diesem wird der 
Makro LOP aufgerufen. Jedesmal wenn dieser verlassen wird, wird am 
Lautsprecher des APPLE II “gezupft" (LDA SPKR) und somit ein Ton 
mit einer Tonhöhe erzeugt, die durch die Übergabeparameter bestimmt 
ist. Die Übergabeparameter für den LUP-Makro bestimmen die Ton¬ 
länge. 

In dem Programm .PROC TON wird nach den Vereinbarungen nur der 
Makro LUP mit 4 Parametern aufgerufen. Die beiden ersten werden an 
die Variablen %1 und %2 übergeben, die beiden anderen an %3 und %4. 
Dies sind aber die Übergabeparameter für den Makro LOP und dessen 
Variable %1 und %2. 


Was der Assembler aus diesen Makroaufrufen macht zeigt Abbildung 
8.3. Hier werden die Übergabeparameter an den richtigen Stellen einge¬ 
fügt und das vollständige Programm ausgedruckt. 
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PAGE 


1 TON 


FILE:SYSTEM.WRK.TEXT 


00005 

Current memory available: 

OOOOö C03C 

OOOOö 0010 

OOOOö 0011 

OOOOö 

00005 

OOOOü A9 10 
00025 85 10 
0004Ö A9 40 
OCOöö 85 11 
00085 

00085 AO 80 
000A5 A2 01 
COOCö 88 
OOOOö DOFD 
OOOFö CA 
OOlGö DOFA 
0012Ö 8D 30C0 
001rö C6 11 
C017Ö DOEF 
0019c C6 10 
001 Bö D0E7 
001 Dö 

001 Do A9 10 
OOlFö 85 10 
00215 A9 40 
00235 85 11 
0025Ö 

0025Ö AO FF 
0027ö A2 01 
00295 88 
0G2AÖ DOFD 
002CÖ CA 
002D5 DOFA 
0C2FÖ 8D 30C0 
0032Ö C6 11 
0034Ö DOEr 
00365 C6 10 
0038 ö D0E7 
003 Aö 
003 Aö 


8018 

.PROC TON 

SPKR 

.EQU 0C030 

H 

.EQU 10 

Hl 

.EQU 11 


LUP 

10,40,80,01 

# 

LDA 

/MC 

# 

STA 

H 

#$ 1 

LDA 

// 40 

# 

STA 

Hl 

//$2 

LOP 

80,01 

# 

LDY 

080 

// 

LDX 

00*1 

#$1 

DEY 


# 

BNE 

$1 

# 

DEX 


# 

BNE 

$1 

0 

STA 

SPKR 

# 

DEC 

Hl 

# 

BNE 

$2 

# 

DEC 

H 

# 

BNE 

$1 


LUP 

10,40,OFF,01 

# 

LDA 

//10 

0 

STA 

H 

#$1 

LDA 

#40 

0 

STA 

Hl 

#$2 

LOP 

OFF,01 

0 

LDY 

#0FF 

0 

LDX 

#01 

#$1 

DEY 


0 

BNE 

$1 

# 

DEX 


0 

BNE 

$1 

0 

STA 

SPKR 

0 

DEC 

Hl 

0 

BNE 

$2 

0 

DEC 

H 

0 

BNE 

$1 


!end 


8.3 Assemblertext Makrodemo 


Die Verwendung von Makros ist dann sinnvoll, wenn immer wieder 
kehrender Text in einem Assemblerprogramm auftritt. 

Bei der Assemblierung können Teile des Quelltextes durch eine IF . 
ELSE-Anweisung davon ausgenommen werden. 

Beispiel: .IF (AUSDRUCK ) 

( TEXT1> 

[.ELSE ] 

< TEXT2> 

.ENDC 


146 


Der TEXT1 wird nur dann assembliert, wenn < AUSDRUCK ) ungleich 
Null ist. Dann aber wird TEXT2 (wenn vorhanden) übersetzt. 

Folgende Befehle werden im PASCAL-Assembler abweichend von 
anderen 6502 Assemblern geschrieben: 

LDA @ ADR,Y = LDA (ADR),Y 
LDA @ ADR,X = LDA (ADR,X) 

JMP @ ADR = JMP (ADR) 


8.13 Die wichtigsten Monitorroutinen 

OUTCHR Ausgabe eines Zeichens auf den Bildschirm. 

Adresse: SFDED 

Dieses Unterprogramm gibt ein Zeichen an der augenblicklichen Cursor¬ 
position aus. Er springt dabei über einen Vektor in den Zellen S36 und 
$37 in die eigentliche Ausgaberoutine COUT1 bei Adresse $FDF0. Da¬ 
durch kann man leicht die Ausgabe auf ein anderes Ausgabegerät um¬ 
steuern. Der Vektor zeigt auf den Beginn des eigenen Ausgabepro¬ 
gramms. An dessen Ende springt man mit einem JMP 8F0F0 in die 
Bildschirmausgabe. 

Die Registerinhalte bleiben erhalten. 


PRTBYT Adresse 8FDDA 

PRTBYT gibt den Akkumulatorinhalt in Form von 2 Hexadezimal¬ 
zeichen auf den Bildschirm aus. Der Akkumulatorinhalt wird zer¬ 
stört. 


RDKEY Eingabe eines Zeichens vom Tastenfeld 
Adresse $FD0C 

Dieses Unterprogramm springt über einen Vektor in den Zellen $38 und 
$39 in das Programm KEYIN bei Adresse $FD1B. 

Wie bei der Ausgabe kann durch Umsteuern des Vektors, die Eingabe 
eines Zeichens von einem anderen Gerät durch ein eigenes Programm 
erfolgen. 
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8.2 ATARI 

8.21 ATARI — Editor/Assembler für ATARI 400 und ATARI 800 

Der ATARI-Assebler besteht aus 3 Teilen. Dem Text-Editor, dem 
eigentlichen Assembler und einem "Debugger", ein Programm zum 
Testen von Maschinenprogrammen. Wir wollen uns hier nur mit den 
ersten beiden Teilen befassen. 

Der Text-Editor ist zeilenorientiert. Die Zeilennumerierung erfolgt 
automatisch nach Eingabe des Befehls NUM. Ohne weitere Optionen 
wird die Zeilennumerierung mit 10 begonnen und jeweils um 10 er¬ 
höht. Folgenden Optionen sind möglich: 

NUMnn Die Zeilennumerierung wird um nn er¬ 

höht. 

NUMmm,nn Die Zeilennumerierung beginnt bei mm 

und wird um nn erhöht. 

Die vorgegebene Numerierung wird durch 
Eingabe von 2 mal RETURN ausgeschaltet. 

Die Löschung einer Zeile erfolgt durch DEL. 

DELnn Löschung der Zeile nn. 

DELnn,mm Löschung der Zeilen nn bis mm. 

NEW Löscht den Textspeicher. 

Mit REN lassen sich die Zeilen neu numerieren. Dabei gelten die 
gleichen Optionen wie bei NUM. 

REN Zeilennumerierung von 10 in 10-erSchitten. 

RENnn Zeilennumerierung in Schritten von nn. 

RENmm,nn Zeilennumerierung beginnt bei mm und 

wird in Schritten von nn erhöht. 

Neben diesen Anweisungen besitzt der Texteditor noch die Befehle 
FIND zum Suchen einer Zeichenkette und REP (Replace) zum Suchen 
und Ändern einer Zeichenkette im Textspeicher. 
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Der Assembler kennt folgende Pseudo-Befehle: 

Die * - Anweisung. 

Beispiel: 10 * = $6000 

Damit wird die Anfangsadresse des übersetzten Programms festgelegt. 
Falls keine neue Festsetzung folgt, beziehen sich alle folgenden 
Adressen auf diese Anfangsadresse. 

Die .BYTE - Anweisung 
Beispiel: 20 .BYTE 22 

Damit wird im Programm ein Byte Speicherplatz mit der Dezimalzahl 
22 belegt. Folgen mehrere Zahlen, getrennt durch Komma, so belegen 
diese die folgenden Byts. 

Beispiel: 20 .BYTE 22,33,21 

Soll an dieser Stelle ein Text im Programm gespeichert werden, so ist 
dieser Text in Anführungszeichen zu setzen. 

Beispiel: 20 .BYTE "DIES IST TEXT" 


Man beachte. Daß Pseudo-Befehle, die aus einem Wort bestehen, mit 
einem Punkt ( . ) beginnen. 


Die .DBYTE - Anweisung 

Diese Anweisung reserviert 2 Byte Speicherplatz. 

Beispiel: 40 .DBYTE $1F26 

Dabei wird die Zahl $1F26 in dieser Reihenfolge gespeichert. Ist die 
augenblickliche Adresse $4010 so wird in $4010 $1F und in $4011 
$26 gespeichert. 

Die .WORD - Anweisung 

Diese Anweisung entspricht der .DBYTE Anweisung. Es werden wieder¬ 
um 2 Speicherplätze reserviert, nur wird die Zahl in umgekehrter 
Reihenfolge eingeschrieben. 

Beispiel: 40 .WORD $1F26 

Wenn wir wieder bei der Adresse $4010 sind, so wird in Adresse $4010 
$26 und in $4011 $1F gespeichert. Da bei 6502 Systemen auf diese 
Weise Adressen gespeichert werden, wird man mit der .WORD An¬ 
weisung Adresstabellen anlegen. 
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Die .END - Anweisung 

Mit dieser Anweisung wird der duelltext abgeschlossen. Sie muß am 
Ende jedes Programms auftreten. 

Die = - Anweisung 

Mit dem Gleichheitszeichen werden Marken im Programm Adressen 
zugewiesen. 

Beispiel: 10 MARKE =$1000 

Der symbolische Name MARKE entspricht der Adresse S1000. 

In dieser Zeile darf nach der Zeilennummer nur ein Leerzeichen folgen. 
Die Adressenzuweisung an Marken kann auch durch Adressrechnung 
erfolgen: 

Beispiel: 10 * = $1000 

20 TAB = * + $20 

TAB entspricht dann in diesem Beispiel der Adresse $1020. 


Weitere Pseudo-Befehle sind: 

10 .TITEL "NAME“ Eingabe eines Programmnamens. 

20 .PAGE "TEXT" Eingabe einer Seitenüberschrift. 

40 .TAB n1,n2,n3 Tabellierung des Ausdrucks, wobei im 

Ausdruck des übersetzten Programms das 
Operationscodefeld bei nl, das Adress- 
feld bei n2 und das Kommentarfeld bei 
n3 beginnt. 


Mit 4 .OPT - Anweisungen kann die Assemblierung beeinflusst werden. 


100 .OPT NOLIST 
200 .OPT LIST 

100 .OPT NOOBJ 
200 .OPT OBJ 


100 .OPT NOERR 
200 .OPT ERR 


Der Text zwischen Zeile 100 und 200 wird 
bei der Übersetzung nicht ausgegeben. 

Der Text zwischen den Zeilen 100 und 200 
wird nicht übersetzt, der Speicherplatz aber 
freigehalten. 

Die Ausgabe von Fehlern, die zwischen den 
Zeilen 100 und 200 bei der Übersetzung 
auftreten, werden nicht ausgegeben. 
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100 . OPT NOEJECT Kein zusätzlicher Zeilenvorschub bei einen 

200 .OPT EJECT Seitenvorschub zwischen den Zeilen 100 

und 200. 

Mit der IF-Anweisung können Teile des Quellcodes von der Über¬ 
setzung ausgenommen werden. 

Beispiel: 50 Z=0 

100 .IF Z@MARKE 


150 MARKE 

Der Quelltext in den Zeilen 100 bis 150 wird nur übersetzt, wenn Z 
Null ist. Ändert man Zeile 50 in Z=1 ab, so wird der Text in den Zeilen 
100 bis 150 nicht übersetzt, und auch kein Speicherplatz freigehalten. 

Die Eingabe von Kommentar erfolgt nach der Adresseneingabe. Beide 
müssen durch ein Leerzeichen getrennt sein. Als Trennzeichen kann 
auch der Stichpunkt (;) verwendet werden. Soll eine Kommentarzeile 
im Text eingefügt werden, so beginnt diese mit einem Strichpunkt. 

Allgemein ist beim Schreiben eines Programmes folgendes zu beachten: 
Zwischen der Numerierung und einer Marke muß ein Leerzeichen ein¬ 
gefügt sein, zwischen Numerierung und einem Assembler oder Pseudo¬ 
befehl müssen zwei Leerzeichen vorhanden sein. Eine Fehlermeldung 
wird erst bei der Assemblierung ausgegeben. 

Die Schiebebefehle, die sich auf den Akkumulator beziehen lauten 
hier: 

LSR A 
ASL A 
ROL A 
ROR A. 

Beim Assemblieren mit dem ATARI ist immer der Quelltext und das 
übersetzte Programm im Speicher vorhanden. Man muß deshalb dafür 
sorgen, daß sich diese beiden Programme nicht überschreiben und daß 
sie auch nicht Speicherbereiche des Monitors und des Bildspeichers 
benutzen. 
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Mit der Monitoranweisung SIZE werden drei Adressen ausgegeben. 


Beispiel: SIZE 

Rechner antwortet: 0700 0880 5C1F 

S700 ist die Anfangsadresse, S880 die Endadresse des Textspeichers. 
Von hier bis zur Adresse S5C1F ist der Speicher frei für Maschinen¬ 
code. 

Schreiben eines Programms. 

Nach Einstecken des Moduls Assembler befindet sich der Rechner im 
Texteditor. Der Quelltext kann nun geschrieben werden, wobei zu 
beachten ist, daß Marken nur ein Leerzeichen zwischen Zeilenzahl und 
ersten Buchstaben enthalten, bei Assemblerbefehlen aber zwei Leer¬ 
zeichen vorhanden sein müssen. Der Quellcode wird mit .END abge¬ 
schlossen. Die Übersetzung wird durch den Befehl ASM eingeleitet. 
Ohne weitere Optionen wird der Quellcode aus dem Textpuffer über¬ 
setzt, der Ausdruck erfolgt auf dem Bildschirm, und das Maschinen¬ 
programm wird bei der angegebenen Anfangsadresse in das RAM 
abgelegt. Soll die Ausgabe auf den Drucker erfolgen, so ist die Option 
#P notwendig. Der Befehl lautet dann: 


ASM,#P 


Durch die Eingabe von LIST erfolgt die Ausgabe des Textpuffers auf 
den Bildschirm. Es findet keine Übersetzung statt. Bei LIST können 
folgende Optionen angegeben werden: 

LIST#E (gleich wie LIST) Bildschirmausgabe 


LIST#P 


Druckerausgabe 
Speicherung auf Kassette. 


LIST#C 


(Anmerkung: Hier kein Komma zwischen Befehl und Option) 


Weitere Befehle sind: 
PRINT 


Drucken ohne Zeilennummer. 


SAVE 


ENTER 


Einlesen eines Quellprogramms. 
Speichern eines Maschinenprogramms. 
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LOAD 


Laden eines Maschinenprogramms. 


8.22 Monitor und Speicherbelegung 

Der Monitor des ATARI-Computers weist gegenüber anderen Monitoren 
einige Besonderheiten auf. Er besteht aus 3 Teilen: 

1. CIO Programmteil für allgemeinen I/O Datentransfer 

2. SIO I/O-Programmteil für serielle Datenübertragung 

3. IH Interrupt - Service - Routinen 

Die Verwendung von Interrupts bedingt gleichfalls die Verwendung von 
Tabellen für den augenblicklichen Maschinenzustand und Sprung¬ 
tabellen für Programmverzweigungen. 

Für den Programmablauf der ClO-Routine sorgt eine in den Zellen S340 
bis S348 gespeicherte Tabelle IOCB (Input Output Control Table) für 
die Ausführung eines Input-Output Datentransfers. Vom Benutzer kann 
dabei der Befehl ($342), die Puffer-Adresse (S344, $345), die Puffer¬ 
länge (S348, $349) und eine zusätzliche Information (S34A, S34B) 
übergeben werden. 


Beispiel: Tabelle für die Bildschirminitialisierung nach dem Einschalten 
des Rechners: 


$342 $03 Befehl OPEN 


$344 $18 Fl 18 = Adresse des Textes E : EOL 

$345 $F1 ($45, $3A, $9B) 


$34A $0C 


Bitmuster für "Open for all Devices, Input 
or Output" 


Mit dieser Tabelle und einem JSR CIO wird der Bildschirm initialisiert. 


Verfolgt man die "Power up" Routine, so findet man hier die Be¬ 
deutung einiger Speicherzellen. 

Die Speicherzelle $52 ist der linke Bildschirmrand, in $53 der rechte 
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Bildschirmrand angegeben. 

Bei der Initialisierung enthalten die Zellen $02 und $27. 

Weiter wird festgestellt, ob ROM-Kassetten oder RAM in den Steck¬ 
plätzen A und B vorhanden sind. Dabei wird zuerst Steckplatz B unter¬ 
sucht. Ist der Inhalt der Adresse S9FFC Null, und lässt dieser sich nicht 
ändern, so ist eine ROM-Kassette vorhanden und das Programm dieser 
Kassette wird durch einen indirekten Sprung über die Adresse S9FFE 
gestartet. 

Ist keine Kassette oder RAM an diesem Steckplatz so wird der andere 
Platz A untersucht. Die Adressen dieses Steckplatzes sind SBFFC und 
SBFFE. Das Vorhandensein einer ROM-Kassette wird in den Speicher¬ 
zellen $06 für A-Kassette und $07 für B-Kassette mit einer 1 vermerkt. 
Nach Abschluß des Initialisierungsprogramms wird, wenn keine ROM- 
Kassette, keine Disk und keine Kassette gebootet werden konnte, das 
Blackboard-Programm über den DOS-Vektor in den Speicherzellen 
$0A und $0B angesprungen. 

In Abbildung 8.2 ist die Speicherbelegung des ATARI 800 dargestellt. 


Es folgen nun die wichtigsten Monitor-Unterprogramme. 


8.23 Einige Monitorunterprogramme 

Unterprogramm KGETCH 

Adresse SF6DD 

Dieses Programm übernimmt ein Zeichen vom Tastenfeld. Beim Rück¬ 
sprung ist dieses Zeichen im Akkumulator und kann von dort ins 
Hauptprogramm übernommen werden. X und Y Register werden 
verändert. 

Unterprogramm EGETCH 

Adresse SF63E 

Dieses Programm übernimmt ein Zeichen vom Tastenfeld und gibt es 
bei der augenblicklichen Cursorposition aus. Ein Rücksprung aus dieser 
Routine erfolgt durch - RETURN, dabei ist das zuerst eingegebene 
Zeichen im Akkumulator. 
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65535 , SFFFF 


57344 

, 8E000 

55296 

, SD800 

53248 

, 8D000 

49152 

, 8C000 

40960 

, SAOOO 

32768 

, 88000 

31755 

, 871CF 


10880 

, S2A80 

9856 

, 82680 

4864 

, 81300 

1792 

, 8700 

1536 

, 8600 

1406 

, 857E 

1152 

, 8480 

512 

, 8200 

256 

, 8100 

128 

, 880 

0 

, 800 



8.2 Speicherbelegung ATARI 
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Dieses Programm wird in der BLACKBOARD-Routine verwendet. 

ANF JSR EGETCH 
CLC 

BCC ANF 

Es kann nur durch BREAK oder durch Ausschalten des Rechners 
verlassen werden. 

Unterprogramm EOUTCH 

Adresse SF6A4 

Dieses Programm gibt das ATASCII-Zeichen im Akkumulator bei der 
augenblicklichen Cursorposition aus. Nach dem Rücksprung ist es noch 
im Akkumulator vorhanden, X- und Y-Register sind verändert. 


Für die Cursorsteuerung stehen folgende Soriderzeichen zur Verfügung. 
Eine Ausgabe dieser Zeichen mit EOUTCH bewirkt folgende Funktion: 

870 Löscht den Bildschirm und setzt den Cursor in die linke 
obere Ecke. 

$1C Der Cursor wird eine Zeile nach oben gesetzt. 

81D Der Cursor wird eine Zeile nach unten gesetzt. 

81E Der Cursor wird eine Stelle nach links gesetzt. 

81F Der Cursor wird eine Stelle nach rechts gesetzt. 

In allen Fällen wird die Cursorpositionierung am anderen Bildrand 
weitergeführt, wenn ein Bildrand überschritten worden isT/ 

8FF Dieses Steuerzeichen schiebt den Text rechts vom augen¬ 
blicklichen Cursorstand eine Stelle nach rechts und macht 
somit Platz zum Einfügen eines Zeichens. 

890 Alle Zeilen, von der augenblicklichen Cursorposition an 
und darunter werden eine Zeile tiefer gesetzt und eine 
Leerzeile eingefügt. Der Cursor steht am Anfang dieser 
Leerzeile. 


156 


S7E Der Cursor wird eine Stelle nach links gesetzt, aber nicht 
über den Anfang der Zeile hinaus. 

S9C Löscht die Zeile mit der augenblicklichen Cursorposition. 
Alle darunterliegenden Zeilen werden hochgesetzt. 

SFE Löscht den Buchstaben bei der augenblicklichen Cursor¬ 
position. Alle Zeichen rechts davon werden eine Stelle 
links geschoben. 

2FD Gibt einen Ton aus, der Text wird nicht verändert. 

S9B Dieses Zeichen bedeutet EOL (End Of Line) und wird 
als Begrenzung einer Zeile oder eines Datensatzes ver¬ 
wendet. Seine Funktion entspricht dem nicht vorhandenen 
ASCII-Zeichen RETURN. 

Unterprogramm PUTLIN 

Adresse SF385 

Dieses Unterprogramm gibt einen im Rechner gespeicherten Text aus. 
Die Anfangsadresse des Textes wird im X- und Y-Register übergeben, 
mit dem LSB der Adresse im X-Register und dem MSB der Adresse im 
Y-Register. Als Textendezeichen wird S9B verwendet. Ist kein Text¬ 
endezeichen vorhanden, so werden 255 Byte, als ATASCI-Zeichen 
interpretiert und ausgegeben. 

Das folgende Programm gibt einen Text in der obersten Bildzeile aus: 

2 EOUTCH = SF6A4 
4 PUTLIN =SF385 


10 

* = S0600 


20 

LDA #S70 

Bildschirm löschen 

30 

JSR EOUTCH 


40 

LDX #50 

Anfangsadresse setzen 

50 

LDY #06 


60 

JSR PUTLIN 

Text ausgeben. 

70 

BRK 

Programm abbrechen. 

80; 



100 

* = 30650 


110 

.BYTE "DIESER TEXT WIRD AUSGEGEBEN" 

120 

.BYTE 39B 


999 

.END 



Ein weiteres Beispiel ist ein Programm für einen Speicherauszug 
(HEXDUMP). 

Es benutzt das schon in Kapitel 7.7 beschriebene Unterprogramm 
PRTBYT. 


00 BO 


10 STARTL. 

= 

$B0 

00 B 2 


20 ENDEL 

= 

$B2 

00B4 


30 COUNT 

= 

$B4 

F6A4 


40 OUTCH 

= 

$F6A4 

0000 


45 


*= 

$2000 

2000 

AOOO 

50 DUMP 

L_DY 

#$00 

2002 

84B4 

60 


STY 

COIJNT 

2004 

AOOO 

63 NO 

LDY 

#$00 

2006 

Bl BO 

65 


LDA 

(STARTL) 

2008 

203520 

70 


JSR 

PRTBYT 

200B 

E6B4 

80 


INC 

COUNT 

200D 

A5B4 

90 


LDA 

COUNT 

200F 

C908 

0100 


CMP 

#08 

2011 

D009 

0110 


BNE 

Ml 

2013 

A99B 

0120 


LDA 

#$9B 

2015 

20A4F6 

0130 


JSR 

OUTCH 

2018 

A900 

0140 


LDA 

#$00 

201A 

85B4 

0150 


STA 

COUNT 

20 IC 

E6B0 

0160 

Ml 

INC 

STARTL 

20 IE 

D002 

0170 


BNE 

M 

2020 

E6B1 

0180 


INC 

STARTL+1 

2022 

A5B1 

0190 

M 

LDA 

STARTL+1 

2024 

C5B3 

0200 


CNP 

ENDEL+1 

2026 

90DC 

0210 


BCC 

NO 

2028 

F002 

0220 


BEQ 

M2 

202A 

BOOS 

0230 


BCS 

DRTS 

202C 

A5B0 

0240 

M2 

LDA 

STARTL. 

202E 

C5B2 

0250 


CNP 

ENDEL 

2030 

90D2 

0260 


BCC 

MO 

2032 

FODO 

0270 


BEQ 

MO 

2034 

60 

0280 

DRTS 

RTS 


2035 

85B5 

0290 

PRTBYT 

STA 

COUNT+1 

2037 

4A 

0300 


LSR 

A 

2038 

4A 

0310 


LSR 

A 

2039 

4A 

0320 


LSR 

A 

203A 

4A 

0330 


LSR 

A 

203B 

204B20 

0340 


JSR 

HEXTA 
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203E 

A5B5 

2040 

204B20 

2043 

A920 

2045 

20A4F6 

2048 

A5B5 

204A 

60 

204B 

290F 

204D 

C90A 

204F 

18 

2050 

3002 

2052 

6907 

2054 

6930 

2056 

4CA4F6 

2059 



0350 

0360 

0364 

0366 

0370 

0380 

0390 HEXTA 

0400 

0410 

0420 

0430 

0440 HEXTA1 

0450 

0460 


L.DA 

COUNT+1 

JSR 

HEXTA 

LDA 

#$20 

JSR 

OUTCH 

LDA 

COUNT+1 

RTS 


AND 

#$0F 

CMP 

#$0A 

CLC 


BMI 

HEXTA1 

ADC 

#$07 

ADC 

#$30 

JMP 

OUTCH 


. END 


8.21 Programm Hexdump-ATARI 


Die für dieses Programm benötigten Speicherzellen in der Zero-Page 
wurden auf die Adressen $B0 — $B5 gelegt. Die Plätze von SBO — $CF 
ist der für den Benutzer freie Speicherbereich, die Assembler, Gleit¬ 
komma-Unterprogramme und BASIC nicht verwenden. 


Der Monitor benötigt ausnehmend viele Zellen in der Zero-Page (SOO — 
S7F). Diese enthalten hauptsächlich Merker und Adressen. 


Die Programmierung der Farben, Töne und der Grafik erfolgt über 
Hardware-Register (SDOOO — SD41F). Das Umschalten eines Bytes 
ändert z. B. augenblicklich die Hintergrundfarbe. 


Hier bietet der ATARI dem Programmierer in Maschinencode ausge¬ 
zeichnete Möglichkeiten. 
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8.3 Programmieren in Maschinensprache mit Commodore Rechnern 

Die Programmierung der PET/CBM/VIC Rechner ist vom Prinzip her 
sehr einfach, wenn Sie dieses Buch bis hierher studiert haben. Probleme 
gibt es dabei nur durch den ständigen Wechsel der Betriebssysteme, 
Zeropagebelegungen. Es gibt jedoch in den CBM- und Pet-Geräten mit 
den verschiedensten Betriebssystemen oben im Speicher (nähe FFFF) 
eine Sprungtabelle mit den wichtigsten Routinen für den Maschinen¬ 
sprachenprogrammierer. 



PET 2001 (alte ROMs) 


In den neuen CBM-Systemen 3001 und 4001 ist ein Monitor eingebaut. 
Er kann mit SYS(1024) aufgerufen werden. Für die älteren PETs gibt 
es einen Monitor auf Cassette. 
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Er erlaubt dem Anwender Speicherzellen anzusehen und zu ändern: 

M 033A, 03EE 

bringt den Inhalt der Zellen 033A — 03EE Hex auf den Bildschirm. 
Sie können dann mit dem Cursor diese Zeilen abändern oder z. B. 
ein Programm eingeben. 


Mit G XXXX können Sie ein Maschinenprogramm an Adresse XXXX 
Hex starten. 


Der Befehl X erlaubt Ihnen die Rückkehr nach BASIC, L und S er¬ 
möglichen ein Laden und Speichern von Maschinenprogrammen auf 
Cassettenband (Siehe hierzu PET-User Manual) 



Der VC-20 Volkscomputer mit Cassettenrecorder 
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Die wichtigsten Adressen in der Sprungtabelle für unsere kleinen Ver¬ 
suche sind: 


Funktion 

Adresse in der Sprungtabelle 

Eingabe eines Zeiches von der 

Tastatur (aus Puffer) GET a. Ch. 

FFE4 

Eingabe eines Zeichens (RDT) 

FFCF 

Ausgabe eines Zeichens auf dem 
Bildschirm 

FFD2 

Bildschirmspeicher 

ab 8000 Hex = 32768 Dezimal 

ASCII nach HEX-Wandlung und 
Ablage im Akku (HEXIT) 

0685 

Wagenrücklauf CRLF 

04F2 

Rücksprung Monitor 

0400 

LOAD Routine 

FFD5 

SAVE Routine 

FFD8 

STOP Cassettenmotor 

FFED - FFFA 

RESET 

FFFC — FFFD 

NMI 

FFFA- FFFB 

IRQ 

FFFE - FFFF 

Cassettenpuffer für Cass. 11 

826- 1017 Dez 

033A - 03F9 Hex 

Bildschirm löschen SYS(57910) 
beim PET 2001 (alte ROMs) 

E236 Hex 

Bildschirm löschen bei der 

3000er Serie SYS(57829) 

E1E5 Hex 


Freie "Zero-Page"-Adressen S23 — S5A Hex, wenn Sie im Monitor 
programmieren. 

Wir wollen jetzt unser Standardprogramm einmal auf dem CBM 3001 
implementieren: 
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Eingabe eines Zeichens von der Tastatur auf den Bildschirm: 

Wir legen unser Programm in einen Adressbereich des CBM, der auch 
in BASIC geschützt ist, nämlich ab Adresse 033A (zweiter Cassetten- 
puffer). 


033A 

JSR 

SFFCF 

20CFFF 

033D 

JSR 

SFFD2 

20D2FF 

0340 

JMP 

S033A 

4C3A03 


Geben Sie dieses Programm mit Hilfe des Monitorbefehles M ein und 
starten Sie mit G 033A. 

Geben Sie Werte von der Tastatur ein und beobachten Sie den Bild¬ 
schirm. Da der CBM keine BREAK-Taste hat, muß das Gerät ausge¬ 
schaltet, und alles wieder neu eingegeben werden. 

Wir wollen jetzt eine Abfrage einbauen, die uns ermöglicht, durch 
Drücken der A-Taste unser kleines Programm wieder zu verlassen. 


Nach Eingabe des Zeichens von der Tastatur her, fragen wir nach dem 
Hex-Zeichen 41 = ASCII A ab. 

Dies geschieht durch die Befehle CMP und BEQ. 


033A 

20E4FF 

033D 

C941 

033F 

F006 

0341 

20D2FF 

0344 

4C3A03 

0347 

4C0004 


Wir verwenden diesmal die GET Routine, welche das Zeichen von der 
Tastatur unmittelbar in den Akkumulator übernimmt. 


Wie der CMP und BEQ-Befehl arbeiten haben wir bereits kennengelernt. 


Ein weiteres Beispiel in Maschinensprache 
Ausdruck des Zeichensatzes auf den Bildschirm. 


LDX #S00 
TXA LP TXA 
STA $8150,X 

INX 

BNE LP 

JMP $0400 


In Hexadezimal übersetzt ergibt sich: 

033A A4 00 8A 9D 50 81 E8 DO 

0342 F9 4C 00 04 00 

Dieses Maschinenprogramm können Sie auch von BASIC über SYS(826) 
aufrufen (33A Hex = 826 Dezimal). Vorher müssten Sie jedoch den 
Rücksprung in den Monitor in Zelle 0343 Hex in RTS = 60 Hex ab¬ 
wandeln. 


Hier eine kurze Beschreibung dieses kleinen Maschinensprachenpro¬ 
grammes: 


Schritt 

Text 

1 . 

Lade das X-Register mit 0 

2. 

Bringe den Inhalt des X-Registers in den Akkumulator 

3. 

Lade den Inhalt des Akkus in Zelle $8150 (Zelle 8150 
ist die Postleitzahl von Holzkirchen und die 8 Zeile 
auf dem Bildschirm des CBM (PET)). 

4. 

Addiere eine 1 zum Inhalt des X-Registers hinzu 

5. 

Springe nach Schritt 2 solange, bis X nicht Null ist. 
(Das X-Register wird null, wenn es bis FF = 256 hoch¬ 
gezählt wurde). Dadurch erhalten wir eine Schleife 
bis 256. 

6. 

Rücksprung in Monitor JMP 0400 oder RTS, wenn von 
BASIC aufgerufen. 




Ein äquivalentes BASIC-Programm würde wiefolgt aussehen: 


5 GOSUB10 
7 END 
10 1=0 

20 POKE 33104 + 1,1 
30 LET I = I + 1 
40 IF I <256 GOTO 20 
50 RETURN 


Programmieren in Maschinensprache mit VC-20 Volkscomputer von 
Commodore 

Die Programmierung des Volkscomputers VC-20 von Commodore 
erfolgt ähnlich wie die der PET/CBM-Serie. 

Die Kernel Einsprungadressen sind gleich geblieben. Wir haben folgende 
Routinen im Kernel identifizieren können. 

FFD2 Hex für CH ROUT = Ausgabe eines Zeichens auf dem Bild¬ 
schirm 

FFE4 Hex für GETIN = Eingabe eines Zeichens von der 

Tastatur. 

FFCF Hex für CHRIN = Eingabe eines Zeichens 
FFC6 Hex für CHKIN = Device-Bestimmung von wo aus ein¬ 
gegeben werden kann. 

Geändert hat sich der verfügbare Speicherbereich. In der Grundversion 
beginnt der RAM-Bereich für Anwenderprogramme in BASIC an 
Adresse 1000 Hex = 4096 Dezimal. Der Bereich von 400 Hex — FFF 
Hex ist in der Grundversion nicht bestückt (ähnlich wie KIM-1 und 
SYM). 

Der Bildschirmspeicher liegt nicht wie beim PET/CBM ab Adresse 8000 
Hex — 8400 Hex sondern ab Adresse 1E00 — 1FFF Hex = 7680 — 
8191 Dezimal. 

Achtung ! 

Der VC-20 hat nur noch einen Cassettenpuffer ab Adresse 033C Hex = 
828 Dezimal bis 1023 Dezimal. Diesen können Sie jetzt nicht mehr so 
problemlos für Anwenderprogramme verwenden, wenn Sie später auf 
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Cassette speichern wollen. 


POKER MAKER 


500 PRINT"3ML TO BASIC PROGRAMMER" 

502 PRINT!PRINT"THIS PROGRAM GENERATES A BASIC P 
ROGRAM" 

504 PRINT"WHICH LOADS A MACHINE LANGUAGE ROUTINE 
":PRINT 

506 REM DIESES PROGRAMM ERZEUGT EIN MASCHINEN- 

507 REM PROGRAMM IN DATA ZEILEN.WELCHE 

508 REM DANN EINGEPOKED WERDEN KOENNEN. 

510 REM ACHTEN SIE DARAUF,DASS SIE SINN- 

511 REM VOLLEN CODE IN DEN RAM ZELLEN HABEN. 

512 INPUT "STARTING LOCATION" LI 
514 INPUT "ENDING LOCATION"JL2 

51G IF L2< =L1 THEN 500 
518 PRINT "3" 

520 print " 20 fori=";li;"to";l 2 ; m :readdc:pokei,dc 
:nexti" 

522 PRINT "L1-"JLI *":L2="’L27"IG0T0528" 

524 POKE 525,10!F0R N^O TO 9:P0KE 527+N, 13!NEXT 
N 

526 PRINT ""I END 
528 ML=L1:LN=22 
530 PRINT "3" 

532 PRINT LN?"DATA"; 

534 Dl^PEEK(ML):D1$=STR$(D1) 

53G DC$ = RIGHT$ ( D1 $ ,LEN(D1 $)-1) 

538 print dc*;:ml=ml+i 

540 IF POS(0)<3G THEN 544 

542 PRINT.'PRINT "LN= " J LN J " +2 I ML= " ; ML ; " ! L2= " L2 ‘ " 
IG0T0530"IGOTO 548 

544 IF ML>L2 THEN PRINT!PRINT "G0T0554"!GOTO 548 
546 PRINT CHR$(44 ) ; IGOTO 534 
548 PRINT "" 

550 POKE 525,10:F0R N^O TO 3!POKE 527+N,13!NEXT 
IM 

552 PRINT "".'END 
554 1=500!J=502!K=504 
55G REM 
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558 REM 

5G0 PRINT "3":PRINT IIPRINT J:PRINT K 

5S2 print ,, i = "; i+b; ": j = " ; j+b; " :k = h ;k+g; " :goto5go 

ii 

5G4 PRINT "" IPOKE 525,10. - F0R N = 0 TD 9:P0KE 527+N 
>131NEXT N 
READY. 


Dieses Programm läuft nur auf den alten PET's mit ROM-Version 1. 
Für CBM-Systeme der 3000er oder 4000er Serie müsste er erst abge¬ 
wandelt werden. POKER MAKER generiert ein Programm, welches 
Dezimalwerte in den Speicherbereich bringt. Geben Sie Anfangs- und 
Endaddresse in dezimaler Form ein. Nach einigen Sekunden steht Ihr 
gewünschtes Programm im Speicher. 

Besitzer, welche einen CBM der 3000er Serie haben, können das Pro¬ 
gramm für sich wiefolgt abändern. 

In den Zeilen 524, 550 und 564 muß die Zahl 525 in 158 und 527 in 
623 abgewandelt werden. Dann läuft der POKER MAKER auch auf 
CBM. 


Die Routine arbeitet in dieser geänderten Version auch auf der 4000er 
Serie. 


Es empfiehlt sich daher Maschinenprogramme nach 1000 Hex Anfangs¬ 
adresse zu legen. 


Ein weiterer Bereich, der von Maschinensprachenprogrammierer noch 
genutzt werden kann ist der BASIC-Arbeitsbereich ab Adresse 0000 
Hex — 0090 Hex (0 — 144 Dezimal). BASIC im ROM befindet sich an 
der gleichen Stelle im Speicher wie bei den CBM/PET-Maschinen, 
nämlich von C000 — E000 Hex. 


Unser kleines Beispielprogramm müsste deshalb für den VC-20 wie- 
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folgt aussehen: 


LDX #S00 
TXA LP TXA 
STA S1E58 
INX 

BNE LP 
RTS 


Die Anfangsadresse des Bildschirmes wurde entsprechend abgeändert 
(siehe STAS1E58). 

Das Programm sähe dann wiefolgt aus: 

1000 A2 00 8A 9D 58 IE E8 DO 

1009 F9 60 


Da der VC-20 in der Grundversion keinen eingebauten Maschinen¬ 
sprachenmonitor besitzt, müssen Sie dieses Programm über BASIC in 
den Speicher "poken" und mit SYS(4096) von BASIC aus starten. 

Hierzu übersetzen wir zuerst die Hexadezimalzahlen in Dezimalzahlen. 

Hex: A2 00 8A 9D 58 IE E8 DO F9 60 
Dez.: 162, 00, 138, 157 , 88 , 30 ,232, 208, 249 , 96 

Das zu verwendende BASIC-Programm für Ihren VC-20 muß nun wie¬ 
folgt aussehen: 

10 FOR X = 4096 TO 4105 
20 READY 
30 POKE X,Y 
40 NEXTX 

50 DATA 162,00,138,157,88,30 
60 DATA 232,208,249,96 
100 END 

Geben Sie dieses kleine BASIC-Programm nun in Ihren VC-20 ein und 
starten Sie es mit RUN. Danach geben Sie SYS(4096) ein und sehen 
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sich das Ergebnis auf dem Bildschirm an. Achten Sie einmal auf die 
Geschwindigkeit der Programmausführung. Für größere Programme 
dieser Art gibt es spezielle Utilities, welche ein Maschinenprogramm 
im Speicher automatisch in DATA-Zeilen mit entsprechenden Dezi¬ 
malwerten umwandelt (POKER MAKER). 

Das Programm Eingabe eines Zeichens und Darstellung auf dem Bild¬ 
schirm würde dann wiefolgt aussehen: 


1000 

JSR 

SFFCF 

20CFFF 

1003 

JSR 

SFFD2 

20D2FF 

1006 

JMP 

S1000 

4C0010 


Geben Sie dieses Programm einmal über Ihren Monitor ein. Wenn kein 
Monitor vorhanden, kann es wieder an Hand der vorher besprochenen 
Methode in Dezimalzahlen umgerechnet und in den Speicher "ge- 
poked" werden. Der Start von BASIC geschieht wieder mit SYS(4096) 
Sie müssten eigentlich selbst in der Lage sein, eigene kleine Maschinen¬ 
programme zu schreiben und auf Ihren VC-20 auszutesten. 


8.4 Programmieren in Maschinensprache mit dem Ohio Scientific 
Superboard oder CIP-Computer 

Seien Sie herzlich willkommen in der wunderbaren Welt der 6502 
Maschinensprache auf dem Ohio Superboard. Wir gehen davon aus, 
daß Sie bereits in BASIC programmiert haben und sich jetzt mit den 
wichtigsten Grundlagen der 6502 Maschinensprache auf Ihrem System 
vertraut machen wollen. Die folgende kleine Einführung soll Sie mit 
den Grundlagen vertraut machen und besonders die systemspezifischen 
Eigenschaften herausstellen. Weiterhin soll Sie Ihnen als Starthilfe für 
Ihre weiteren eigenen Maschinensprachen-Experimente dienen. 

Soweit wie möglich, wollen wir immer vom Flußdiagramm ausgehen, 
welches wir zuerst gemeinsam erarbeiten. Wenn das Flußdiagramm 
erstellt ist, werden wir dann unser Programm im Maschinencode er¬ 
stellen. 

Der Monitor des Superboards (C1P) ist recht dürftig, so daß es sich 
empfiehlt einen komfortableren Monitor anzuschaffen (Supermonitor/ 
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Extended Monitor etc.). Der "eingebaute" Monitor kann nach dem 
Einschalten oder nach BREAK über M initialisiert werden. Dieser 
65 V Monitor befindet sich in allen Ohio Scientific Computern. 



Der Superboard C1P-MF 


Er belegt die Speicheradressen ab FEOO Hex bis FEFF. Er verwendet 
256 Byte RAM ab Adresse 0100 Hex und 5 Bytes oben an der Grenze 
der Zero-Page (FB — FF). 


Der 65 V-Monitor kennt zwei verschiedene "Modes". 
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1. Adressmode 

2. Data-Mode 




Befehle: 

/ 

GXXXX = 
L 

RETURN = 


Wechsel in den Data-Mode 

Start an Adresse XXXX 

Laden von Cassette (Maschinencode) 

Wechsel in den Adressmode 

Öffnen der nächsten Adresse (Erhöhen der Adresse um 1) 


Alle Tasten, die keine Kommandos oder nicht Hexadezimalzahlen 
liefern, werden vom Monitor nicht anerkannt. 


Wichtige Adressen und Marken: 


MARKE 

ADRESSE 

BEZEICHNUNG 

VM 

FEOO 

RESTART MONITOR 


FEOC 

ohne UART und Stack- 
Pointer 

IN 

FE43 

Eingang in Adressmode 

INNER 

FE77 

Eingang in DATA-Mode 

OTHER 

FE80 

Eingabe ASCII-Zeichen von 
der Audio Cassette über 
UART 

LEGAL 

FE93 

Bringt ASCII-Zahl, wenn 
0—9 oder A bis F. Sonst FF 

INPUT 

FEED 

Eingabe ASCII-Zeichen vom 
Keyboard. 


Wir wollen wieder sofort mit einem Beispiel beginnen. 


Problemstellung: 

Wir wollen ein Programm erstellen, welches ein Zeichen, das über die 
Tastatur eingegeben wird, erkennt, aufnimmt und auf dem Bildschirm 
darstellt. 
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Flußdiagramm: 



Wir müssen zuerst einmal den Akkumulator mit einem bestimmten Wert 
von der Tastatur laden. Da gibt es bereits eine Routine die dies für uns 
erledigen könnte. Sie beginnt im Speicher an der Adresse SFDOO. 
Diese Routine lädt den ASCII-Wert des Zeichens, welches wir auf der 
Tastatur gedrückt haben in den Akkumulator. Was wir nun noch 
brauchen ist eine Routine, die den Wert auf den Bildschirm bringt. Wir 
könnten jetzt einen Bildschirmspeicherplatz direkt mit unserem 
Zeichen laden und hätten somit unser Zeichen bereits dargestellt. 


Es gilt jedoch auch wieder eine andere Möglichkeit. Wir können aber 
auch nach einer Routine suchen, die bereits vorhanden ist und die 
Aufgabe erledigt, die wir lösen möchten. Wir finden eine solche Routine 
an der Adresse 8BF2D. 


Diese Routine kann sogar noch etwas mehr als wir eigentlich wollten. 
Sie ermöglicht uns u. a. mehr als nur ein Zeichen darzustellen. Ver¬ 
schieben des Zeichens sowie noch einige andere interessante Opera¬ 
tionen. 











Lösung unseres kleinen Problems: 


0280 2000FD JSR $FD00 

0283 202DBF JSR SBF2D 

0286 4C8002 JMP S0280 

In Maschinensprache übersetzt ergibt sich dies: 

2000FD 202DBF 

Wenn wir wollen können wir dieses kleine Programm in einer unend¬ 
lichen Schleife laufen lassen. Wir können jetzt JMP $0280 hinzufügen. 
Wobei wir annehmen, daß unser kleines Programm oben an der Adresse 
0280 Hex beginnt. 


JMP $0280 

In Maschinencode sieht dieser Befehl wiefolgt aus: 

4C8002 


Geben Sie nun dieses kleine Programm mit Hilfe des Monitors ein: 

Gehen Sie mit @ (Control P) in den Dateneingabemode des Monitors 
und geben Sie die richtigen Werte ein. Um das Programm auszuführen, 
geben Sie dann G 0280 ein. Um aus der unendlichen Schleife wieder 
herauszukommen drücken Sie einfach die BREAK-Taste. Dann können 
Sie wieder mit G 800 den Monitor starten. 


Eines der größten Geheimnisse bei der Programmierung in Maschinen¬ 
sprache ist der Trick immer zuerst nach Routinen im Monitor (Betriebs¬ 
system etc.) zu suchen. Wenn Sie eine Routine finden, die Ihre Pro¬ 
grammieraufgabe lösen kann, verwenden Sie sie. Sie sparen viel Codier- 
und Fehlersucharbeit. Aus diesem Grunde lohnt es sich immer die 
Monitore zuerst zu durchforsten und nachzusehen, wo man brauch¬ 
bare Routine findet. 

Kurze Zusammenstellung einiger wichtiger und brauchbarer Routinen 


173 


aus dem Superboard: 

FDOO Eingabe eines Zeichens von der Tastatur, Ergebnis steht im 
Akku 

FCB1 Ausgabe 1 Byte von Akku auf Cassette 
FEOO Eingang in den Monitor 
BF2D Druckt Zeichen im Akku auf den Bildschirm 
FE80 Bringt ASCII-Zeichen von Cassette in Akku. 

Programmieren in Maschinensprache bindet Sie oft sehr an einen be¬ 
stimmten Computer. Der Computer mit dem Sie arbeiten hat spezielle 
Routinen, wie sie nur in diesen und keinen anderen System Vorkommen. 
Es ist ganz wichtig für Sie diese Routinen zu finden und zu lernen, sie 
anzuwenden. 

Problem Nr. 2 



Entwurf eines 
Flußdiagrammes 


174 


















Wir haben nun unsere Routine und die endlose Schleife programmiert 
und sie arbeitet auch. Aber wenn wir nur kurzzeitig aus der Schleife 
herauswollen müssen, wir die BREAK-Taste drücken und dann unser 
Programm wieder neu starten. Dies ist etwas umständlich. Nun wollen 
wir ein Programm entwerfen, welches uns ohne BREAK-Taste aus der 
Schleife herauslässt. 

Sie erkennen jetzt sicher gleich, daß wir ein rautenartiges Kästchen ver¬ 
wendet haben. Ein Pfeil geht hinein und zwei Pfeile kommen heraus. 
Dies ist ein "Entscheidungsblock". Dies bedeutet, daß eine Reihe von 
Ergebnissen im Programmablauf entstehen können und es auf diese 
Ergebnisse verschiedene Antworten geben kann. Meist einfach nur Ja 
oder Nein. Je nach Antwort des Computers reagiert dann dieser unter¬ 
schiedlich. In BASIC würde dies einem Bedingungsbefehl entsprechen. 
Z. B. 

IF ESC Then. 

IF "A" Then. 

Lösung: Startadresse 0280 Hex 

1 JSR 
CMP 
BEQ 

2 JSR 
JMP 
RTS 

Jetzt müssen wir noch eine Reihe von Dingen erläutern. 

Das S-Zeichen bedeutet daß eine Hexadezimalzahl folgt. Das Nummern¬ 
zeichen # sagt, daß es sich um unmittelbare Adressierung handelt. 

Befehlserläuterung: 

Der CMP-Befehl ist ein Vergleichsbefehl (CoMPare = Vergleichen). 
Wir vergleichen mit diesem Befehl den Akkumulator mit dem nächst 
folgenden Byte. Der Hex-Wert für das ASCI I-Äquivalent von A ist 41 
(Dezimal 61). Nach dem Vergleich treffen wir auf den Befehl BEQ 
(Branch if Equal). Diese Bedingung wird nur erfüllt, wenn ein A($41), 
also eine 41 Hex im Akkumulator vorhanden ist. Da die beiden dann 


SFDOO^—| 
#S41 
S028D * 

SBF2DI-1 

S0280 


(IX JSR) 
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gleich sind, verzweigt sich der Computer auf einen anderen Speicher¬ 
platz. 

Sie müssen jedoch die A-Taste drücken, um den Wert 41 Hex in den 
Akku zu bringen. 


Sie müssen lernen, wie man einen solchen Sprung berechnet. Dazu 
muß man, wissen wie viele Befehle übersprungen werden müssen. In 
unserem Falle ist die Antwort 806. Um diese Aufgabe korrekt lösen 
zu können, muß auch bekannt sein wieviel Bytes jeder der Befehle 
benötigt. 

Der JSR-Befehl benötigt 3 Byte. Es werden 2 dieser Befehle über¬ 
sprungen und dann wird wieder zum CMP-Befehl zurückgekehrt und 
verglichen (3 Byte + 3 Byte = 06 Byte). 


20 00 FD C9 41 F0 06 

20 2D BF 4C 80 02 60 

Geben Sie diesen Code ab 0280 Hex ein und Disassemblieren Sie einmal 
den Code zur Kontrolle. 


0280 

2000 FD 

JSR 

SFDOO 

0283 

C941 

CMP 

#841 

0285 

F006 

BEQ 

80280 

0287 

202D8F 

JSR 

8BF2D 

028A 

4C8002 

JMP 

80280 

028D 

60 

RTS 



Maschinensprachen-Quickis 

Jetzt wollen wir kleine Beispiele eingeben und etwas experimentieren. 


1. Laden Sie den Monitor ein 

2. Drücken Sie die BREAK-Taste 

3. Geben Sie M ein 

4. Geben Sie 0800G ein 
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5. Shift P = @ 0222 

20 (Line Feed nach jeder Eingabe drücken !) 

0223 

00 

0224 

FD 

0225 

20 

0226 

2D 

0227 

BF 

0228 

4C 

0229 

22 

022A 

02 RETURN führt zurück in COMMAND 


MODE 


6. Geben Sie Q 0222 ein. Dieser Befehl disassembliert diesen Code und 
zeigt folgendes: 

0222 2000 FD JSR SFD00 Eingabe 

0225 202DBF JSR SBF20 Anzeige auf Bildschirm 

0228 4C2202 JMP S0222 Sprung an den Anfang 

Diese Routine ermöglicht es Ihnen etwas über die Tastatur einzugeben 
und es auf dem Bildschirm darzustellen. Drücken Sie nun RETRURN 
und geben Sie G0222 ein. Alles was Sie nun über die Tastatur eingeben, 
erscheint auf dem Bildschirm. Um aus den Programm wieder heraus¬ 
zukommen, müssen Sie BREAK drücken. Drücken Sie nun wieder M 
und 0800G. 

Ein etwas kompliziertes Programm 

Nun wollen wir uns ein anderes Programm ansehen. Nehmen wir einmal 
an, wir wollen es ermöglichen, daß die Geschwindigkeit in der die 
Zeichen auf dem Bildschirm erscheinen veränderbar ist. Wir wollen das 
Programm für unsere Anwendunge benutzen. Mit dem Monitor geht 
dies ganz einfach. Alles, was wir tun müssen, ist folgendes: 

1. CRTLP@0206 

2. Wir geben einen Wert zwischen 00 und FF in diese Zelle (FF ist die 
niedrigste Geschwindigkeit). 

3. Geben Sie in Zelle 0206 FF ein. 

Probieren Sie es einmal aus und disassemblieren Sie zur Kontrolle 
einen beliebigen Bereich (z. B. ab Adresse 0800). 

Wechseln Sie die Werte etwas und beobachten Sie die Veränderungen. 
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Nun wollen wir ein Programm schreiben, welches die Geschwindigkeit 
für uns ändert. Was wir hierzu brauchen ist eine Eingaberoutine die 
unsere Eingabe von der Tastatur aufnimmt und diese in die Speicher¬ 
zelle 80206 schreibt. 

Das zugehörige Flußdiagramm sieht wiefolgt aus: 



+ Anzeige 


Rücksprung in Monitor 


Dies sieht so aus, als ob es funktionieren könnte. Wird es aber auch 
wirklich arbeiten? 

Was geschehen wird, ist, daß die Tastaturroutine den Wert als ASCII- 
Wert in die Speicherzelle gibt. Wir müssen also ein Zeichen über die 
Tastatur eingeben, dessen Wert aus der ASCII-Tabelle dem gewünschten 
Wert in Zelle 0206 (Hex) entsprechen soll. 

Um die Sache auf dem Bildschirm verfolgen zu können, springen wir in 
die Anzeigenroutine. Am Schluß kehren wir dann in den Monitor des 
Superboardes zurück (Adresse FE00 Hex). 

So sieht das Programm aus: 


JSR 

SFD00 

; Eingaberoutine 

JSR 

SBF2D 

; Anzeigeroutine (nur ganz kurz) 

STA 

80206 

; Bringe Akku in Zelle 206 

JMP 

SFE00 

; Springe zurück in Monitor 
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Das Ausrufezeichen (!) hat It. ASCII-Tabelle den Wert 33. Wenn wir 
also ( ! ) eingeben, kommt die Zahl 33 in die Speicherzelle 0206 (21 
Hex = 33 dezimal). 

An die richtigen Adressen gebracht ergibt: 

0280 2000FD 
0283 202DBF 
0286 8D0602 
0289 4C00FE 

Starten Sie das Programm an Adresse 0280, geben Shift - Ausrufe¬ 
zeichen (!) ein und testen Sie ob in Zelle 0206 auch 21 steht. 

Das obige Programm nimmt den Wert, der sich gerade im Akku befindet 
und bringt ihn in Zelle 0206. Dann springt das Programm sofort wieder 
in den Monitor des Superboards (nicht Supermonitor). 

Für diejenigen, die nur mit dem im ROM enthaltenen Monitor arbeiten, 
hier noch einmal kurz die Befehle: 

Schrägstrich (/) Zeichen = Wechsel in Data-Mode 
Punkt (.) = Wechsel in den Adress-Mode 
L = Laden von Cassette 

G = Starten eines Maschinenprogrammes an der gerade im Adressfeld 
angezeigten Adresse. 


8.5 AIM 65 (PC 100) 

Der AIM 65 von Rockwell ist ein Einplatinencomputer mit Schreib¬ 
maschinentastatur, Drucker und einem alphanumerischen LED-Dis- 
play mit jeweils 20 Zeichen. 


8.51 Miniassembler 

Nach dem Einschalten und betätigen der RESET-Taste ist der AIM 65 
im Monitor. Über diesen Monitor kann in Assemblerschreibweise ein 
Maschinenprogramm eingegeben werden. Mit I wird in dieses Eingabe¬ 
programm gesprungen und vom Rechner die augenblickliche Adresse 
angezeigt. 
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Mit * kann eine neue Anfangsadresse gesetzt werden. 

Beispiel: 

Eingabe von Assemblertext ab Adresse S900 (nur die unterstrichenen 
Zeichen müssen eingegeben werden) 

I 


A004 

* = 

0900 

(RET) 


0900 

JSR 

E93C 

(RET) 

(READ) 

0903 

STA 

800 

(RET) 

Diese Zeile wird nicht angenommen, 
sondern: 

0903 

STA 

0800 

(RET) 


0906 

0909 

JSR 

BRK 

E97A 

( RET) 

(OUTPUT) 

090A 

(ESC) 


Damit wird der Miniassembler ver¬ 
lassen. 


Wird bei der Eingabe in den Miniassembler ein Fehler gemacht, so wird 
die Zeile nicht angenommen. Die Adresse bleibt ungeändert. Alle 
Adressen müssen als 4-stellige Hexadezimalzahl eingegeben werden. Das 
S-Zeichen vor einer Adresse oder einer Zahl ist nicht erlaubt, da alle 
eingegebenen Daten Hexadzimal interpretiert werden. Die Eingabe wird 
mit der ESC-Taste beendet. 

Der Zelleninhalt kann durch M ausgegeben werden 

<M) = 0900 (RET > 20 82 EC 8D (LJ) (Leertaste) 

< > 0904 00 08 20 7A < LJ > 

< > 0908 E9 00 12 OB 


Eine Rückübersetzung des Maschinencodes wird durch Eingabe von K 
eingeleitet. 

<_K> * = 0900 < RET) 

/ 

Jetzt muß die Zahl der zu disassemblierenden Zeilen eingegeben wer¬ 
den. Jede Zahl zwischen 01 und 99 ist möglich. 
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Beispiel: 

Rückübersetzung des bei $900 eingegebenen Maschinencodes 


<J<> * = 0900 < RET) 
/04 


•CK>*=090@ 

/04 

0908 28 JSR 
0903 8D STR 
0906 20 JSR 
0909 80 SRK. 


£ 9 'S; y 


Ci Q l’i 



Der AIM 65 
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8.52 AIM - Assembler 

Der ROM residente Assembler des AIM 65 ist ein 2 PASS Assembler. 
Er übersetzt den Assemblertext, der entweder im RAM in einem Text¬ 
speicher abgelegt ist, oder der von Kassette geladen wird. 

Eingabe von Assemblertext über den Texteditor: Die Eingabe von E im 
Monitor ruft den Texteditor auf. Danach wird die Anfangs- und End¬ 
adresse des Textspeichers festgelegt. 

FROM= 0200 (RET) TO = 0400 (RET) 


Diese Angaben legen den Textspeicher in den Speicherbereich von 
S200 bis 8400 und reservieren somit Platz für 512 Byte. Das entspricht 
etwa einem Text von 512 Buchstaben. 

Danach folgt die Abfrage, ob Text von einem externen Gerät gelesen 
werden soll. 


IN = ( RET ) 

Die Eingabe von ( RET ) allein zeigt an, daß der Text über das Tasten¬ 
feld eingegeben wird. Nun kann der Assemblertext geschrieben werden. 
Marken können bis zu 6 Zeichen lang sein und müssen mit einem Buch¬ 
staben beginnen. Zwischen Marke und Befehl, sowie zwischen Befehl 
und Adresse muß mindestens ein Leerzeichen sein. Befehle und Marken 
können in der ersten Stelle einer Zeile beginnen. 

Folgende Pseudobefehle sind vorhanden: 

Die = Anweisung 

Mit dem = Zeichen wird einem symbolischen Namen ein Wert (Daten 
oder Adresse) zugewiesen. 

Beispiel: ANF=8800 
Z = 10 

B0 = % 0 0 1 0 0 0 0 0 


ANF entspricht der Hexadezimalzahl 800, Z entspricht der Dezimal¬ 
zahl 10 und B0 ist die Binärzahl 0 0 1 0 0 0 0 0. Mit der * Anweisung 
wird der Programmzähler gesetzt. 






* = S900 


legt den Beginn des folgenden Programms auf die Adresse 8900. Damit 
können auch Speicherbereiche für Daten reserviert werden. 

* = 8800 
ADRE = * + $10 
ENDE = * + 820 

Mit dieser Anweisungsfolge entspricht ADDE der Adresse 8810 und 
ENDE der Adresse 8820. 

Die .BYTE Anweisung 

Diese Anweisung belegt Speicherplatz für die angegebenen Daten. 
Beispiele: 

TEXT .BYTE 'ABCD', OD, FF 

Damit wird an dieser Stelle unter dem Namen Text die Buchstaben¬ 
folge ABCD als ASCII-Zeichen und die beiden Hexadezimalzahlen 
OD und FF gespeichert. Mehrfache Daten werden durch Komma 
getrennt. Eine Marke ist nicht unbedingt erforderlich. 

Die .WORD Anweisung 

Durch die .WORD Anweisung werden 4 stellige Hexadezimalzahlen im 
Adressenformat gespeichert. Mit 

.WORD SABCD 

wird SABCD im Rechner als CD AB in zwei aufeinanderfolgenden 
Speicherplätzen abgelegt. Damit können Daten für Spruntabellen 
eingegeben werden. Mehrfache Datenangaben werden durch Komma 
getrennt. 

Die .DBYTE Anweisung 

Diese Anweisung entspricht der .WORD Anweisung, nur werden hier 
die Daten in der angegebenen Reihenfolge gespeichert. 

.DBYTE SABCD, S3A4F 
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wird im Rechner als 


AB CD 3A 4F 


abgelegt. 


Die folgenden Pseudobefehle sind Anweisungen für das Assembler¬ 
protokoll. 

Die .PAGE Anweisung gibt eine Seitenüberschrift aus. 

Beispiel: .PAGE 'PROG.V 

Die .SKIP Anweisung erzeugt in Assemblerprotokoll eine Leerzeile. 
Die .END Anweisung gibt das Ende des Quelltextes an. 


Die .OPT Anweisung kann 3 Parameter enthalten. 


LIST, NOLIST Ausgabe oder Unterdrückung der Aus¬ 

gabe des übersetzten Textes. 

GENERATE, NOGENERATE Mit NOGENERATE werden bei einer 

.BYTE Anweisung nur die beiden 
ersten Datenbytes ausgegeben. 

ERRORS, NOERRORS Die Ausgabe von Fehlermeldungen wird 

entweder zugelassen oder unterbunden. 


Von den Parametern werden nur die ersten 3 Buchstaben erkannt. 
Damit kann eine .OPT Anweisung in folgender Form angegeben wer¬ 
den: .OPT NOL, NOG, ERR 


Wird keine .OPT Anweisung verwendet, so gilt: 

.OPT LIS, NOG, ERR 


Die .FILE Anweisung 

Längere Programme können in Teile zerlegt und unter einem Namen 
auf Kassette gespeichert werden. Für die Übersetzung muß aber der 
vollständige Text im Rechner sein. Durch die .FILE < NAME ) An- 
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Weisung am Ende eines Programmteils wird das Einlesen des Textes 
( NAME > von Kassette eingeleitet. 


Nach dem Schreiben des Programms wird mit der ESC-Taste der Text¬ 
editor verlassen und in den Monitor zurückgesprungen. Der Assembler 
wird mit N aufgerufen. 


< N_ . Danach erfolgt die Eingabe der Anfangs- und Endadresse für die 
Symbol-Tabelle 

FROM = 400 (RET) TO = 500 (RET) 


Diese Adressen wird man zweckmässigerweise im Anschluß an den 
Textspeicher legen. Dabei muß man aber beachten, daß das übersetzte 
Programm nicht den Textspeicher oder den Speicherbereich für die 
Symbol-Tabelle benutzt. Als nächstes muß dem Assembler angegeben 
werden, wo sich der Quelltext befindet. Mit 


IN = JM 

wird der Quelltext aus dem Textspeicher übersetzt. Wird die nächste 
Anfrage 

LIST? mit Y beantwortet, so wird mit LIST-OUT=£ ein Über¬ 

setzungsprotokoll auf den Drucker ausgegeben. Danach muß noch 
angegeben werden, wohin der Maschinencode geschrieben wird. Wird 
auf OBJ? ein N eingegeben, so wird das Programm an der, durch die 
* = Anweisung angegebenen Adresse gespeichert. 

Sind bei der Übersetzung Fehler aufgetreten, so können diese im Text¬ 
speicher korrigiert werden. Die Rückkehr in den Texteditor geschieht 
durch Eingabe von T. Es wird die 1. Zeile des Programms angezeigt. 
Soll diese geändert werden, so wird sie mit K gelöscht und nach der 
Eingabe von I neu eingegeben. Mit U wird die vorangegangene Zeile 
angezeigt. 

Abbildung 8.5 zeigt ein kleines Beispiel für ein AIM-Programm. Bei 
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Betätigen der Funktionstaste Fl wird ein bei MSG1 gespeicherter Text 
ausgegeben. 


0EhJ?N 
Pfib'S i 

pass s 


==@080 



+=$8180 

==8180 

40.0008 

jup Fi 

==810F 

0UTPUT=$E97fi 

==810F 

0LR=$EB44 

==818 F 

+=$0808 

==8880 

Fi 

2044EB 

JSR 0LR 

H2FF 

LDX #$FF 

==8885 

LOOP 

E8 

im 

801488 

LDft MSGi.< K 

0938 

0HP ft-.;-' 

F08S 

SEQ RET 

287BE9 

JSR OUTPUT 

18 

0LO 

90F2 

800 LOOP- 

==8813 

RET 

68 

RTS 

==8814 

HSGi 

284540 

.BYTE •- EL' 

434F 

. BYTE -•0OriP; ' 
. END 


errors= 0000 
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Abbildung 8.5 


Die wichtigsten Monitorunterprogramme sind: 


OUTPUT 


NUMA 


READ 


Anfangsadresse SE97A 

Ausgabe eines ASCI I-Zeichens auf LED-Display und 
Drucker. 

Anfangsadresse SEA46 

Druckt den Inhalt des Akkumulators als 2 Hexadezimal¬ 
zahlen aus. 

Anfangsadresse SE93C 

Liest ein Zeichen vom Tastenfeld in den Akkumulator. 
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Disassembler 


9.0 Disassembler 

Das Gegenstück zum Assembler, der Assemblertext in Maschinencode 
umwandelt, ist der Disassembler. 

Dieser wandelt, soweit es möglich ist, den Maschinencode wieder in 
Assemblertext zurück. Diese Rückübersetzung ist dann notwendig, 
wenn ein Programm nur als Maschinencode vorliegt und es analysiert 
werden soll. Die Rückübersetzung ist aber auch dann notwendig, wenn 
Fehler im Programm gefunden werden sollen. 


9.1 Disassemblieren von Maschinencode 

Die Rückübersetzung von Maschinencode ist nicht ganz problemlos Sie 
muß, um überhaupt erfolgreich zu sein, auf dem Speicherplatz eines 
gültigen Operationscodes beginnen. Das Programm entschlüsselt diesen 
Operationscode und stellt fest, ob es ein 1,2 oder 3 Byte Befehl ist. 
Dann wird die Assemblerschreibweise des Befehls aus einer Tabelle 
geholt, die Art der Adressierung festgestellt und die Befehlszeile aus¬ 
gegeben. Wenn dies ein 3 Byte Befehl war, so muß das 3. Byte nach 
dem gerade entschlüsselten Befehl wieder ein Operationscode sein. Sind 
nun Daten im Programm vorhanden, so versucht der Disassembler, diese 
ebenfalls zu entschlüsseln. Dabei kann der Disassembler zu falschen 
Rückübersetzungen gelangen. In Abbildung 9.1 ist dies gezeigt. 

Das Programm ist in Speicherzelle SC44E mit dem Sprung nach SC100 
(4C 00 01) beendet. Es folgen Daten. Diese werden teilweise als 
Befehlszeilen interpretiert, wie z. B. AD F9 99 als LDA S99F9, oder 
2C BA E8 als BIT SE8BA. 
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Dabei geht aber bei der Disassemblierung der Anfang eines anderen Pro¬ 
grammteils in Adresse 8C460 verloren. Das letzte Byte des rücküber¬ 
setzten Befehls BIT SE8BA ist E8, und dies ist ein gültiger Operations¬ 
code für INX. 


C447- 

68 



PLA 


C448-' 

A8 



TAY 


C449- 

68 



PLA 


C44A- 

AA 



TAX 


C44B- 

4C 

OC 

FD 

JMP 

$FD0C 

C44E- 

4C 

00 

CI 

JMP 

$C100 

C451- 

CO 

EA 


CPY 

#$EA 

C453- 

EA 



NOP 


C454- 

EA 



NOP 


C455- 

AD 

F9 

99 

LDA 

$99F9 

C458- 

A7 



??? 


C459- 

4C 

49 

65 

JMP 

$6549 

C45C- 

9E 



??? 


C45D- 

47 



??? 


C45E- 

2C 

BA 

E8 

BIT 

$E8BA 

C461- 

C8 



INY 


C462- 

98 



TYA 


C463- 

E8 



INX 


C464- 

98 



TYA 


C465- 

18 



CLC 



9.1 Fehlerhafte Rückübersetzung 


Adressen und Sprungziele werden als Hexadezimalzahlen ausgegeben. 
Nur sehr komfortable Disassembler können hier symbolische Namen in 
einem 2. Durchgang einführen. 

In Abbildung 9.2 ist der im APPLE II verwendete Disassembler gezeigt. 
Dieser wurde von Steve Wozniak geschrieben und im DDJ September 
1976 veröffentlicht. Die Anfangsadresse des rückzuübersetzenden Pro¬ 
gramms wird nach S44 und S45 geschrieben und der Disassembler bei 
Adresse S800 gestartet. 


Als Besonderheit sei darauf hingewiesen, daß der Text für einen 
Assemblerbefehl, der normalerweise 3 Byte belegen würde, in 2 Byte 
zusammengefasst wurde, um Speicherplatz zu sparen. Wenn nur die 
32 Buchstaben ausgegeben werden sollen, so genügen für die Dar¬ 
stellung eines Buchstaben 5-bit. In 16-bit, 2 Byte, können also 3 Buch¬ 
staben untergebracht werden. In den Abbildungen 9.3 und 9.4 ist der 
Hexdump für das Programm und für die Tabellen getrennt angegeben. 
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0800 


2 





0800 


3 





0800 


4 


XXXXXXXXXXXXXXXXX 

0800 


5 





0800 


6 


* 1 

DISASSEMBLER 

0300 


7 


X 



0800 


8 


xxxxxxxxxxxxxxxxx 

0800 


9 





0800 


10 





0800 


11 

i 

i 

EPZ 

$40 

0800 


12 

FORMAT 

EPZ 

M 

0800 


13 

LENGTH 

EPZ 

M+1 

0800 


14 

LMNEM 

EPZ 

M+2 

0800 


15 

RMNEM 

EPZ 

M+3 

0800 


16 

PCL 

EPZ 

M+4 

0800 


17 

PCH 

EPZ 

M+5 

0800 


18 

COUNT 

EPZ 

M+6 

0800 


19 





0800 


20 

PRBYTE 

EQU 

$FDDA 

0800 


21 

CHAROU 

EQU 

$FDED 

0800 


22 



ORG 

$800 

0800 

A913 

23 

DSMBL 

LDA 

#$1'3 

0802 

8546 

24 



STA 

COUNT 

0804 

201208 

25 

DSMBL2 

JSR 

INSTDSP 

0807 

20EF08 

26 



JSR 

PCADJ 

080A 

8544 

27 



STA 

PCL 

080C 

8445 

28 



STY 

PCH 

080E 

C646 

29 



DEC 

COUNT 

0810 

D0F2 

30 



BNE 

DSMBL2 

0812 

20D308 

31 

INSTDS 

JSR 

PRPC 

0815 

AI 44 

32 



LDA 

(PCL,X) 

0817 

A8 

33 



TAY 


0818 

4A 

34 



LSR 


0819 

900B 

35 



BCC 

IEVEN 

081B 

4 A 

36 



LSR 


081C 

BOI 7 

37 



BCS 

ERR 

081E 

C922 

38 



CMP 

#$22 

0820 

F01 3 

39 



BEQ 

ERR 

0822 

2907 

40 



AND 

#$7 

0824 

0980 

41 



ORA 

#$80 

0826 

4 A 

42 

IEVEN 

LSR 


0827 

AA 

43 



TAX 


0828 

BDFE08 

44 



LDA 

MODE, X 

082B 

B004 

45 



BCS 

RTMODE 

082D 

4 A 

46 



LSR 


082E 

4A 

47 



LSR 


082F 

4A 

48 



LSR 


0830 

4A 

49 



LSR 


0831 

290F 

50 

RTMODE 

AND 

#$F 

0833 

D004 

51 



BNE 

GETFMT 

0835 

A080 

52 

ERR 

LDY 

#$80 

0837 

A900 

53 



LDA 

#$0 

0839 

AA 

54 

GETFMT 

TAX 


083A 

BD4209 

55 



LDA 

M0DE2,X 

083D 

8540 

56 



STA 

FORMAT 

083F 

2903 

57 



AND 

#$3 

0841 

8541 

58 



STA 

LENGTH 

0843 

98 

59 



TYA 


0844 

298F 

60 



AND 

#$8F 

0846 

AA 

61 



TAX 


0847 

98 

62 



TYA 


0848 

A003 

63 



LDY 

#$3 

084 A 

E08A 

64 



CPX 

#$8A 

084C 

FOOB 

65 



BEQ 

MNNDX3 

084E 

4A 

66 

MNNDX1 

LSR 


084F 

9008 

67 



BCC 

MNNDX3 

0851 

4 A 

68 



LSR 


0852 

4A 

69 

MNNDX2 

LSR 


0853 

0920 

70 



ORA 

#$20 
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0855 88 
0856 DOFA 
0858 C8 
0859 88 
085A D0F2 
085C 48 
085D Bl44 
085F 20DAFD 
0862 A201 
0864 20E608 
0867 C441 
0869 C8 
086A 90F1 
086C A203 
086E C004 
0870 90F2 
0872 68 
0873 A8 
0874 B95C09 
0877 8542 
0879 B99C09 
087C 8543 
087E A900 
0880 A005 
0882 0643 
0884 2642 
0886 2A 
0887 88 
0888 D0F8 
088A 69BF 
088C 20EDFD 
088F CA 
0890 DOEC 
0892 20E408 
0895 A206 
0897 E003 
0899 D012 
089B A441 
089D FOOE 
089F A540 
08A1 C9E8 
08A3 Bl44 
08A5 BOIC 
08A7 20DAFD 
08AA 88 
08AB D0F2 
08AD 0640 
08AF 900E 
08B1 BD4F09 
08B4 20EDFD 
08B7 BD5509 
08BA F003 
08BC 20EDFD 
08BF CA 
08C0 D0D5 
08C2 60 
08C3 20F208 
08C6 AA 
08C7 E8 
08C8 D001 
08CA C8 
08CB 98 
08CC 20DAFD 
08CF 8A 
08D0 4CDAFD 
08D3 A98D 
08D5 20EDFD 
08D8 A545 
08DA A644 



DEY 



BNE 

MNNDX2 


INY 


MNNDX3 

DEY 



BNE 

MNNDX1 


PHA 


PROP 

LDA 

^ PCL) , Y 


JSR 

PRBYTE 


LDX 

#$1 

PROPBL 

JSR 

PRBL2 


CPY 

LENGTH 


INY 



BCC 

PROP 


LDX 

m 


CPY 

//$4 


BCC 

PROPBL 


PLA 



TAY 



LDA 

MNEML,Y 


STA 

LMNEM 


LDA 

MNEMR,Y 


STA 

RMNEM 

PRMN1 

LDA 

#$o 


LDY 

#$5 

PRMN2 

ASL 

RMNEM 


ROL 

LMNEM 


ROL 



DEY 



BNE 

PRMN2 


ADC 

#$BF 


JSR 

CHAROUT 


DEX 



BNE 

PRMN1 


JSR 

PRBLNK 


LDX 

#$6 

PRADR1 

CPX 

#$3 


BNE 

PRADR3 


LDY 

LENGTH 


BEQ 

PRADR3 

PRADR2 

LDA 

FORMAT 


CMP 

#$E8 


LDA 

(PCL),Y 


BCS 

RELADR 


JSR 

PRBYTE 


DEY 



BNE 

PRADR2 

PRADR3 

ASL 

FORMAT 


BCC 

PRADR4 


LDA 

CHAR1-1,X 


JSR 

CHAROUT 


LDA 

CHAR2-1,X 


BEQ 

PRADR4 


JSR 

CHAROUT 

PRADR4 

DEX 



BNE 

PRADR1 


RTS 


RELADR 

JSR 

PCADJ3 


TAX 



INX 



BNE 

PRNTYX 


INY 


PRNTYX 

TYA 


PRNTAX 

JSR 

PRBYTE 

PRNTX 

TXA 



JMP 

PRBYTE 

PRPC 

LDA 

#$8D 


JSR 

CHAROUT 


LDA 

PCH 


LDX 

PCL 


71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 

119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 
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08DC 

20CC08 

140 


JSR 

PRNTAX 

08DF 

A9AD 

141 


LDA 

WB 

08E1 

20EDFD 

142 


JSR 

CHAROUT 

08E4 

A203 

143 

PRBLNK 

LDX 

#$3 

08E6 

A9A0 

144 

PRBL2 

LDA 

#$A0 

08E8 

20EDFD 

145 

PRBL3 

JSR 

CHAROUT 

08EB 

CA 

146 


DEX 


08EC 

D0F8 

147 


BNE 

PRBL2 

08EE 

60 

148 


RTS 


08EF 

A541 

149 

PCADJ 

LDA 

LENGTH 

08F1 

38 

150 

PCADJ2 

SEC 


08F2 

A445 

151 

PCADJ3 

LDY 

PCH 

08F4 

AA 

152 


TAX 


08F5 

1001 

153 


BPL 

PCADJ4 

08F7 

88 

154 


DEY 


08F8 

6544 

155 

PCADJ4 

ADC 

PCL 

08FA 

9001 

156 


BCC 

RTS1 

08FC 

C8 

157 


INY 


08 FD 

60 

158 

RTS1 

RTS 


08FE 

400245 

159 

MODE 

HEX 

40024503D00840093022 

0901 

03D008 





0904 

400930 





0907 

22 





0908 

4533D0 

160 


HEX 

4533D008400940024533 

090B 

084009 





090E 

400245 





0911 

33 





0912 

D00840 

161 


HEX 

D0084009400245B3D008 

0915 

094002 





0918 

45B3D0 





091B 

08 





091C 

400900 

162 


HEX 

400900224433D08C4400 

091F 

224433 





0922 

D08C44 





0925 

00 





0926 

112244 

163 


HEX 

11224433D08C449A1022 

0929 

33D08C 





092C 

449A10 





092F 

22 





0930 

4433D0 

164 


HEX 

4433D008400910224433 

0933 

084009 





0936 

102244 





0939 

33 





093A 

D00840 

165 


HEX 

D0084009621378A9 

093D 

096213 





0940 

78A9 





0942 

002181 

166 

M0DE2 

HEX 

002181820000594D9192 

0945 

820000 





0948 

594D91 





094B 

92 





094C 

864A85 

167 


HEX 

864A859D 

094F 

9D 





0950 

ACA9AC 

168 

CHAR1 

HEX 

ACA9ACA3A8A4 

0953 

A3A8A4 





0956 

D900D8 

169 

CHAR2 

HEX 

D900D8A4A400 

0959 

A4A400 





095C 

1C8A1C 

170 

MNEML 

HEX 

1C8A1C235D8B1BA19D8A 

095F 

235D8B 





0962 

1BA19D 





0965 

8A 





0966 

1D239D 

171 


HEX 

1D239D8B1DA1002919AE 

0969 

8B1DA1 





0960 

002919 





096F 

AE 





0970 

69A819 

172 


HEX 

69A8192324531B232453 

0973 

232453 





0976 

1B2324 





0979 

53 





097A 

19A100 

173 


HEX 

19A1001A5B5BA5692424 


097D 

1A5B5B 




0980 

A56924 




0983 

24 




0984 

AEAEA8 

174 

HEX AEAEA8AD29007C00159C 

0987 

AD2900 




098A 

7C0015 




098D 

9C 




098E 

6D9CA5 

175 

HEX 

6D9CA569295384133411 

0991 

692953 




0994 

841334 




0997 

11 




0998 

A56923 

176 

HEX 

A56923A0 

099B 

AO 




099C 

D8625A 

177 

MNEMR HEX 

D8625A4 8266294885444 

099F 

482662 




09A2 

948854 




09A5 

44 




09A6 

C85468 

178 

HEX 

C8546844E89400B40884 

09A9 

44E894 




09AC 

00B408 




09AF 

84 




09B0 

74B428 

179 

HEX 

74B4286E74F4CC4A72F2 

09B3 

6E74F4 




09B6 

CC4A72 




09B9 

F2 




09BA 

A48A00 

180 

HEX 

A48A00AAA2A274747472 

09BD 

AAA2A2 




09C0 

747474 




09C3 

72 




09C4 

4468B2 

181 

HEX 

4468B232L20022001A1A 

09C7 

32B200 




09CA 

22001A 




09CD 

1A 




09CE 

262672 

182 

HEX 

2626727288C8C4CA2648 

09D1 

7288C8 




09D4 

C4CA26 




09D7 

48 




09D8 

4444A2 

183 

HEX 

4444A2C8 

09DB 

C8 

184 

END 



9.2 Programm Disassembler 


0800- A9 13 85 
0808- EF 08 85 
0810- DO F2 20 
0818- 4A 90 OB 
0820- FO 13 29 
0828- BD FE 08 
0830- 4A 29 OF 
0838- 00 AA BD 
0840- 03 85 41 
0848- AO 03 EO 
0850- 08 4A 4A 
0858- C8 88 DO 
0860- DA FD A2 
0868- 41 C8 90 
0870- 90 F2 68 
0878- 42 B9 9C 
0880- AO 05 06 
0888- DO F8 69 
0890- DO EC 20 
0898- 03 DO 12 
08A0- 40 C9 E8 
08A8- DA FD 88 
08B0- OE BD 4F 
08B8- 55 09 FO 


46 

20 

12 

08 

20 

44 

84 

45 

C6 

46 

D3 

08 

AI 

44 

A8 

4 A 

BO 

17 

C9 

22 

07 

09 

80 

4A 

AA 

BO 

04 

4A 

4 A 

4 A 

DO 

04 

AO 

80 

A9 

42 

09 

85 

40 

29 

98 

29 

8F 

AA 

98 

8A 

FO 

OB 

4A 

90 

09 

20 

88 

DO 

FA 

F2 

48 

Bl 

44 

20 

01 

20 

E6 

08 

C4 

Fl 

A2 

03 

CO 

04 

A8 

B9 

5C 

09 

85 

09 

85 

43 

A9 

00 

43 

26 

42 

2A 

88 

BF 

20 

ED 

FD 

CA 

E4 

08 

A2 

06 

EO 

A4 

41 

FO 

OE 

A5 

Bl 

44 

BO 

IC 

20 

DO 

F2 

06 

40 

90 

09 

20 

ED 

FD 

BD 

03 

20 

ED 

FD 

CA 
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08C0- DO D5 60 20 F2 08 AA E8 
08C8- DO 01 C8 98 20 DA FD 8A 
08D0- MC DA FD A9 8D 20 ED FD 
08D8- A5 45 A6 44 20 CC 08 A9 
08EO- AD 20 ED FD A2 03 A9 AO 
08E8- 20 ED FD CA DO F8 60 A5 
O8F0- 41 38 A4 45 AA 10 01 88 
08F8- 65 44 90 01 C8 60 


9.3 Hexdump Disassembler 


08FE- 40 
0900- 45 

02 

03 

DO 

08 

40 

09 

30 

22 

0908- 45 

33 

DO 

08 

40 

09 

40 

02 

0910- 45 

33 

DO 

08 

40 

09 

40 

02 

0918- 45 

B3 

DO 

08 

40 

09 

00 

22 

0920- 44 

33 

DO 

8C 

44 

00 

11 

22 

0928- 44 

33 

DO 

8C 

44 

9A 

10 

22 

0930- 44 

33 

DO 

08 

40 

09 

10 

22 

0938- 44 

33 

DO 

08 

40 

09 

62 

13 

0940- 78 

A9 

00 

21 

81 

82 

00 

00 

0948- 59 

4D 

91 

92 

86 

4A 

85 

9D 

0950- AC 

A9 

AC 

A3 

A8 

A4 

D9 

00 

0958- D8 

A4 

A4 

00 

IC 

8A 

IC 

23 

0960- 5D 

8ß 

1 B 

AI 

9D 

8A 

ID 

23 

0968- 9D 

8b 

ID 

AI 

00 

29 

19 

AE 

0970- 69 

A8 

19 

23 

24 

53 

1B 

23 

0978- 24 

53 

19 

AI 

00 

1A 

5B 

5B 

0980- A5 

69 

24 

24 

AE 

AE 

A8 

AD 

0988- 29 

00 

7C 

00 

15 

9C 

6D 

9C 

0990- A5 

69 

29 

53 

84 

13 

34 

11 

0998- A5 

69 

23 

AO 

D8 

62 

5A 

48 

09A0- 26 

62 

94 

88 

54 

44 

C8 

54 

09A8- 68 

44 

£8 

94 

00 

B4 

08 

84 

09B0- 74 

B4 

28 

6E 

74 

F 4 

CC 

4A 

09B8- 72 

F2 

A4 

8A 

00 

AA 

A2 

A2 

09C0- 74 

74 

74 

72 

44 

68 

B2 

32 

09C8- B2 

00 

22 

00 

1A 

1A 

26 

26 

09D0- 72 

72 

88 

C8 

C4 

CA 

26 

48 

09D8- 44 

« 

44 

A2 

C8 






9.4 Hexdump Tabellen 


9.2 Suchen von ASCII-Zeichen 

Das Programm in Abbildung 9.5 dient zum Auffinden von Text in 
Maschinencode. Damit können Daten in unbekannten Maschinen¬ 
programmen gefunden werden. Die Anfangsadresse und die End¬ 
adresse des zu untersuchenden Blockes wird in die Zellen S10, S11 bzw. 
S12 und $13 geschrieben. Ist Bit 7 von MAPF LG = 1, so wird ein Hex¬ 
dump des Bereiches und alle Hexadezimalzahlen größer S21 als ASCII- 
Zeichen ausgegeben. Mit Bit 7 von MPFLG = 0 wird nur ein Hexdump 
ausgegeben. 
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0800 


2 





0800 


3 





0800 


4 


******************** 

0800 


5 


« 



0800 


6 


* TEXTFINDER 

0800 


7 


« 



0800 


8 


«****ft***ft***ft****** 

0800 


9 





0800 


10 

BLKSTR 

EPZ 

$10 

0800 


11 

BLKEND 

EPZ 

$12 

0800 


12 

MAPFLG 

EPZ 

$14 

0800 


13 

POINTR 

EPZ 

$15 

0800 


14 

POINTS 

EPZ 

$17 

0800 


15 

BYTCNT 

EPZ 

$19 

0800 


16 

TMPFLG 

EPZ 

$1A 

0800 


17 

SPACNT 

EPZ 

$1B 

0800 


18 





0800 


19 

PRTCHR 

EQU 

$FDED 

0800 


20 

PRTBYT 

EQU 

$FDDA 

0800 


21 

MONITO 

EQU 

$FF59 

0800 


22 


| 



0800 


23 

! 




0800 

A510 

24 

MEMDMP 

LDA 

BLKSTR 

0802 

8515 

25 



STA 

POINTR 

0804 

A511 

26 



LDA 

BLKSTR+1 

0806 

8516 

27 



STA 

POINTR+1 

0808 

A9FF 

28 

ONELIN 

LDA 

#$FF 

080A 

851A 

29 



STA 

TMPFLG 

080C 

A98D 

30 



LDA 

#$8D 

080E 

20EDFD 

31 



JSR 

PRTCHR 

0811 

A516 

32 



LDA 

POINTR+1 

0813 

8518 

33 



STA 

POINTS+1 

0815 

20DAFD 

34 



JSR 

PRTBYT 

0818 

A515 

35 



LDA 

POINTR 

081A 

8517 

36 



STA 

POINTS 

081C 

20DAFD 

37 



JSR 

PRTBYT 

081F 

A900 

38 



LDA 

#0 

0821 

8519 

39 



STA 

BYTCNT 

0823 

A903 

40 

SEGMNT 

LDA 

# 3 

0825 

851B 

41 



STA 

SPACNT 

0827 

A9A0 

42 

SPACES 

LDA 

#$A0 

0829 

20EDFD 

43 



JSR 

PRTCHR 

082C 

C61B 

44 



DEC 

SPACNT 

082E 

D0F7 

45 



BNE 

SPACES 

0830 

C 619 

46 



DEC 

BYTCNT 

0832 

1 OEF 

47 



BPL 

SEGMNT 

0834 

A908 

48 



LDA 

#8 

0836 

8519 

49 



STA 

BYTCNT 

0838 

AOOO 

50 

ONEBYT 

LDY 

#0 

083A 

Bl 15 

51 



LDA 

(POINTR) ,Y 

083C 

241 A 

52 



BIT 

TMPFLG 

083E 

300C 

53 



BMI 

PRTHEX 

0840 

C921 

54 



CMP 

#$21 

0842 

3008 

55 



BMI 

PRTHEX 

0844 

20EDFD 

56 



JSR 

PRTCHR 

0847 

18 

57 



CLC 


0848 

9005 

58 



BCC 

INCPNT 

084 A 

10BC 

59 

NXTLIN 

BPL 

ONELIN 

084C 

2ODAFD 

60 

PRTHEX 

JSR 

PRTBYT 

084F 

E615 

61 

INCPNT 

INC 

POINTR 

0851 

D003 

62 



BNE 

ENDTST 

0853 

E616 

63 



INC 

POINTR+1 

0855 

D8 

64 



CLD 


0856 

A 51 5 

65 

ENDTST 

LDA 

POINTR 

0858 

C 51 2 

66 



CMP 

BLKEND 

085 A 

A516 

67 



LDA 

POINTR+1 

085C 

E 51 3 

68 



SBC 

BLKEND+1 

085E 

9017 

69 



BCC 

SEGTST 

0860 

2414 

70 



BIT 

MAPFLG 
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0862 

1021 

71 


BPL 

FINISH 

0869 

241A 

72 


BIT 

TMPFLG 

0866 

101D 

73 


BPL 

FINISH 

0868 

C619 

74 


DEC 

BYTCNT 

086A 

E61A 

75 

D0CMAP 

INC 

TMPFLG 

086C 

A517 

76 


LDA 

POINTS 

086E 

8515 

77 


STA 

POINTR 

0870 

A51 8 

78 


LDA 

POINTS+1 

0872 

8516 

79 


STA 

POINTR+1 

0874 

18 

80 


CLC 


0875 

90AC 

81 


BCC 

SEGMNT 

0877 

C 619 

82 

SEGTST 

DEC 

BYTCNT 

0879 

D0BD 

83 


BNE 

ONEBYT 

087B 

2414 

84 


BIT 

MAPFLG 

087D 

1 0CB 

85 


BPL 

NXTLIN 

087F 

241A 

86 


BIT 

TMPFLG 

0881 

30E7 

87 


BMI 

DOCMAP 

0883 

10C5 

88 


BPL 

NXTLIN 

0885 

A98D 

89 

FINISH 

LDA 

#$8D 

0887 

20EDFD 

90 


JSR 

PRTCHR 

088A 

2059FF 

91 


JSR 

MONITO 


92 END 


9.5 Programm Textfinder 


0800- A5 

10 

85 

15 

A5 

11 

85 

16 

0808- A9 

FF 

85 

1A 

A9 

8D 

20 

ED 

0810- FD 

A5 

16 

85 

18 

20 

DA 

FD 

0818- A5 

15 

85 

17 

20 

DA 

FD 

A9 

0820- 00 

85 

19 

A9 

03 

85 

1B 

A9 

0828- AO 

20 

ED 

FD 

C6 

1B 

DO 

F7 

0830- C6 

19 

10 

EF 

A9 

08 

85 

19 

0838- AO 

00 

Bl 

15 

24 

1A 

30 

OC 

0840- C9 

21 

30 

08 

20 

ED 

FD 

18 

0848- 90 

05 

10 

BC 

20 

DA 

FD 

E6 

0850- 15 

DO 

03 

E6 

16 

D8 

A5 

15 

0858- C5 

12 

A5 

16 

E5 

13 

90 

17 

0860- 24 

14 

10 

21 

24 

1 A 

10 

ID 

0868- C6 

19 

E6 

1A 

A5 

17 

85 

15 

0870- A5 

18 

85 

16 

18 

90 

AC 

C6 

0878- 19 

DO 

BD 

24 

14 

10 

CB 

24 

0880- 1A 

30 

E7 

10 

C5 

A9 

8D 

20 

0888- ED 

FD 

20 

59 

FF 

ED 




9.6 Hexdump Textfinder 


9.3 Umsetzen von Maschinenprogrammen auf andere 6502 Systeme 

Das Umsetzen eines Maschinenprogramms von einem 6502 System 
auf ein anderes 6502 bereitet im allgemeinen keine großen Schwierig¬ 
keiten. Kann in beiden Systemen der gleiche Speicherbereich benutzt 
werden, so brauchen nicht einmal die Adressen umgerechnet werden. 
Soll das Programm in einen anderen Speicherbereich geschrieben 
werden, so empfiehlt es sich, das Programm mit einem RELOCATOR 
umzusetzen. Man spart dadurch Arbeit. 
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Als nächstes müssen Monitorunterprogramme gesucht werden. Diese 
sind für jeden Rechner verschieden. Die Bildschirmausgabe oder die 
Tasteneingabe erfolgt bei jedem Rechner durch ein anderes Unter¬ 
programm. Einige Adressen sind in Kapitel 8 angegeben worden. Aller¬ 
dings ist es manchmal notwendig, Teile des Monitorprogrammes vom 
alten Rechner auf den neuen Rechner zu übernehmen. 

Beim Programmieren kann man allerdings die Arbeit des Umsetzen 
auf ein anderes System dadurch erleichtern, daß man Monitor-Unter¬ 
programme nur an wenigen Stellen, oft nur an einer einzigen Stelle 
im Programm anspringt. 

Sind z. B. in einem Programm an mehreren Stellen Ausgaben auf den 
Bildschirm notwendig, so wird man nicht an jeder Stelle einen Moni¬ 
toraufruf JSR OUTCHR machen, sondern einen Unterprogramm¬ 
sprung JSR OUT wie in folgenden Beispiel: 

Nicht: Sondern: 


JSR OUTCHR JSR OUT 

JSR OUTCHR JSROÜT 


JSR OUTCHR JSROÜT 

OUT JMPOÜTCHR 


Im rechten Programm braucht bei einer Umsetzung auf ein anderes 
System nur eine einzige Adresse geändert werden. 


Eine weitere Schwierigkeit beim Umsetzen besteht darin, daß die 
Monitore unterschiedliche Zellen in der Zero-Page benutzen. Falls 
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vom Programm die gleichen Zellen benutzt werden, so kann dies zu 
Fehlern führen. Falls man keinen Belegungsplan für die Zero-Page be¬ 
sitzt, kann man sich folgendermaßen helfen. Man beschreibt die Zero- 
Page mit einem beliebigen Bitmuster, z. B. SAA, nicht S00 oder SFF 
und ruft das Unterprogramm auf. Danach kontrolliert man durch einen 
Speicherauszug welche Zellen sich geändert haben. Diesen Test muß 
man unter Umständen mit einen anderen Bitmuster wiederholen. 

Als Beispiel für das Umsetzen eines Programmes von einem Rechner auf 
einen anderen Rechner soll ein Programm für den KIM auf den APPLE 
II übertragen werden. 


Das KIM-Programm berechnet den Wochentag von Beginn des gre¬ 
gorianischen Kalenders am 14.09.1752 bis zum 31.12.1999. 


Das Programm liegt als Speicherauszug vor und belegte dort die Zero¬ 
page. Da diese im APPLE freigehalten werden soll, wird der Hexdump, 
bei der Adresse 800 beginnend in den Rechner eingetippt (Abbildung 
9.7). Die ersten 5 Zellen, die im Original in der Zero-Page liegen, sind 
Hilfszellen. Das Programm beginnt bei Adresse S805. 


0800- 00 

00 

00 

00 

00 

F8 

38 

A9 

0808- 00 

85 

00 

85 

A0 

85 

B3 

AA 

0810- A5 

04 

C9 

00 

F0 

18 

C9 

04 

0818- 90 

14 

A8 

8A 

18 

69 

01 

AA 

0820- 98 

38 

E9 

04 

DO 

F0 

A5 

01 

0828- C9 

03 

B0 

02 

C6 

B3 

A5 

03 

0830- C9 

20 

B0 

67 

C9 

19 

F0 

2C 

0838- C9 

18 

90 

06 

A9 

02 

85 

00 

0840- DO 

22 

C9 

17 

90 

55 

A5 

04 

0848- C9 

53 

90 

06 

A9 

04 

85 

00 

0850- DO 

12 

C9 

52 

DO 

45 

A5 

01 

0858- C9 

09 

90 

3F 

A5 

02 

C9 

14 

0860- 90 

39 

B0 

E8 

8A 

18 

65 

00 

0868- 65 

02 

A6 

01 

75 

A0 

24 

B3 

0870- F0 

03 

38 

E9 

01 

18 

65 

04 

0878- 90 

02 

C6 

A0 

38 

B0 

02 

E9 

0880- 07 

C9 

07 

B0 

FA 

24 

A0 

10 

0888- 07 

E6 

A0 

18 

69 

01 

DO 

EF 

0890- 85 

00 

A5 

00 

85 

FA 

85 

FB 

0898- 4C 

4F 

IC 

A9 

88 

DO 

Fl 

00 

08A0- 00 

01 

04 

04 

00 

02 

05 

00 

08a8- 03 

06 

20 

70 

09 

A2 

00 

BD 

08B0- 10 

09 

20 

FD 






* 


9.7 Eingegebenes KIM-Programm 


Für eine weitere Untersuchung wird das Programm dissassembliert 
(Abbildung 9.8). 
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0800- 

00 


BRK 


0801- 

00 


BRK 


0802- 

00 


BRK 


0803- 

00 


BRK 


0804- 

00 


BRK 


0805- 

F8 


SED 


0806- 

38 


SEC 


0807- 

A9 

00 

LDA 

#$00 

0809- 

85 

00 

STA 

$00 

080B- 

85 

AO 

STA 

$A0 

080D- 

85 

B3 

STA 

$B3 

080F- 

AA 


TAX 


0810- 

A5 

04 

LDA 

$04 

0812- 

C9 

00 

CMP 

#$ 00 

0814- 

F0 

18 

BEQ 

$082E 

0816- 

C9 

04 

CMP 

#$04 

081 8- 

90 

14 

BCC 

$082E 

081A- 

A8 


TAY 


081B- 

8A 


TXA 


081C- 

18 


CLC 


081D- 

69 

01 

ADC 

#$01 

081F- 

AA 


TAX 


0820- 

98 


TYA 


0821- 

38 


SEC 


0822- 

E9 

04 

SBC 

#$C4 

0824- 

DO 

FO 

BNE 

$0816 

0826- 

A5 

01 

LDA 

$01 

0828- 

C9 

03 

CMP 

#$03 

082A- 

BO 

02 

BCS 

$082E 

082C- 

C6 

B3 

DEC 

$B3 

082E- 

A5 

03 

LDA 

$03 

0830- 

C9 

20 

CMP 

#$20 

0832- 

BO 

67 

BCS 

$089B 

0834- 

C9 

19 

CMP 

#$19 

0836- 

FO 

2C 

BEQ 

$0864 

0838- 

C9 

18 

CMP 

#$18 

083A- 

90 

06 

BCC 

$0842 

083C- 

A9 

02 

LDA 

#$02 

083E- 

85 

00 

STA 

$00 

0840- 

DO 

22 

BNE 

$0864 

0842- 

C9 

17 

CMP 

#$17 

0844- 

90 

55 

BCC 

$089B 

0846- 

A5 

04 

LDA 

$04 

0848- 

C9 

53 

CMP 

#$53 

084 A- 

90 

06 

BCC 

$0852 

084C- 

A9 

04 

LDA 

#$04 

084E- 

85 

00 

STA 

$00 

0850- 

DO 

12 

BNE 

$0864 

0852- 

C9 

52 

CMP 

#$52 

0854- 

DO 

45 

BNE 

$089B 

0856- 

A5 

01 

LDA 

$01 

0858- 

C9 

09 

CMP 

#$09 

085 A- 

90 

3F 

BCC 

$089B 

085C- 

A5 

02 

LDA 

$02 

085E- 

C9 

14 

CMP 

#$14 

0860- 

90 

39 

BCC 

$089B 

0862- 

BO 

E8 

BCS 

$084C 

0864- 

8A 


TXA 


0865- 

18 


CLC 


0866- 

65 

00 

ADC 

$00 

0868- 

65 

02 

ADC 

$02 

086A- 

A6 

01 

LDX 

$01 

086C- 

75 

AO 

ADC 

$A0, X 

086E- 

24 

B3 

BIT 

$B3 

0870- 

FO 

03 

BEQ 

$0875 

0872- 

38 


SEC 


0873- 

E9 

01 

SBC 

#$01 

0875- 

18 


CLC 


0876- 

65 

04 

ADC 

$04 
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0878- 

90 

02 


BCC 

$087C 

087A- 

C6 

A0 


DEC 

$A0 

087C- 

38 



SEC 


087D- 

B0 

02 


BCS 

$0881 

087F- 

E9 

07 


SBC 

#$07 

0881- 

C9 

07 


CMP 

#$07 

0883- 

B0 

FA 


BCS 

$087F 

0885- 

24 

A0 


BIT 

$A0 

0887- 

10 

07 


3PL 

$0890 

0889- 

E6 

A0 


INC 

$A0 

088B- 

18 



CLC 


088C- 

69 

01 


ADC 

#$01 

088E- 

DO 

EF 


BNE 

$087F 

0890- 

85 

00 


STA 

$00 

0892- 

A5 

00 


LDA 

$00 

0894- 

85 

FA 


STA 

$FA 

0896- 

85 

FB 


STA 

$FB 

0898- 

4C 

4F 

IC 

JMP 

$1 C4F 

089B- 

A9 

88 


LDA 

#$88 

089D- 

DO 

Fl 


BNE 

$0890 

089F- 

00 



BRK 


08A0- 

00 



BRK 


08A1- 

01 

04 


ORA 

($04,X) 

08A3- 

04 



??? 


08A4- 

00 



BRK 


08A5- 

02 



??? 


08A6- 

05 

00 


ORA 

$00 

08a8- 

03 



??? 


08A9- 

06 

20 


ASL 

$20 

08AB- 

70 

09 


BVS 

$08B6 

08AD- 

A2 

00 


LDX 

#$00 

08AF- 

08B2- 

BD 

10 

09 

LDA 

$0910,X 


9.8 KIM-Programm disassembliert 


Dabei stellt man fest, daß weitere Hilfszellen (AO bis B3) in der Zero- 
Page belegt werden. 

Auf der Suche nach einem Monitorunterprogramm findet man in 
Adresse $898 ein JSR $1C4F. Betrachtet man das Programmstück 
zwischen Adresse $890 und $89E, so stellt man fest, daß dies eine 
unendliche Schleife darstellt. Beim KIM wird dabei der Inhalt der Zelle 
$00 nach $FA, $FB übertragen und auf 2 7-Segmentanzeigen des 
Displays angezeigt. Dieses Programmstück wird durch einen JSR 
PRTBYT ($FDDA) gefolgt von einen BRK-Befehl ersetzt. 


Da sich im Programm keine Sprungbefehle oder Unterprogrammauf¬ 
rufe befinden, brauchen auch keine Adressen geändert werden, die 
durch die Umsetzung in einen anderen Speicherbereich notwendig 
gewesen wären. Hier zeigt sich der Vorteil, wenn man im Programm 
einen JMP < MARKE ) vermeidet und man stattdessen CLC, BCC 
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< MARKE > verwendet. Dies geht nur bei kurzen Programmen, aber 
überall wo es möglich ist, sollte man den Sprungbefehl durch eine 
relative Verzweigung ersetzen. 

Das Datum wird in diesem Kalenderprogramm in die Zellen SOI bis 
S04 eingegeben und zwar in der amerikanischen Schreibweise. Als 
Beispiel nehmen wir den 27.05.1981. Die Zellen werden dann folgen¬ 
dermaßen belegt: 

501 = 05 

502 = 27 

503 = 19 

504 = 81 

Das Ergebnis erscheint in Zelle S00 und zwar mit 01 = Sonntag, 
02 = Montag bis 00 = Samstag. Abbildung 9.9 zeigt die Änderung 
für den APPLE-Computer. 


85 00 
A5 00 
20 DA FD 
00 


STA $00 
LDA $00 
JSR $FDDA 
BRK 


9.9 Änderung für APPLE II 
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Interface- 
Bausteine 


10. Interface—Bausteine 
10.1 Der Baustein PIA 6520 

Der Baustein PIA (Peripheral Interface Adapter) 6520 ist ein Vorgänger 
des 6522, und baugleich mit dem 6820. 



Interner Aufbau: 

Das Blockschaltbild zeigt Abbildung 10.1. Zur Außenwelt stehen 2 
Tore A und B und 2 Steuerleitungen, zur Prozessorseite der 8-bit 
Datenbus und ebenfalls Steuerleitungen zur Verfügung. Eine bessere 
Übersicht zeigt Abbildung 10.2. 

Die beiden Tore A und B werden jeweils über die Datenrichtungsregister 
DDRA und DDRB und die beiden Kontrollregister CRA und CRB an- 
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gesteuert. Für diese 6 Register sind aber nur 2 Adressierungen RSO und 
RS1 (RS = Register Select) vorhanden. Die Datenrichtungsregister 
und die Tore haben die gleiche Adresse. Ein Bit im Kontrollregister 
(CRA2 bzw. CRB2) legt fest, welches der beiden Register angewählt 
wird (Abbildung 10.3). 



CAI 

CA2 


PA? 
PA I 
PA 2 
PA3 
PA4 
PAS 
PA6 
PA7 


PB9 

PBI 

PB2 

PB3 

PB4 

PB5 

PB6 

PB? 


CBI 

CB2 


10.2 Interner Aufbau des 6520 
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RSO 

RS1 

CRA2 

CRB2 

ausgewähltes Register 

0 

0 

1 

- 

TORA 

0 

0 

0 

- 

DDRA 

0 

1 

- 

— 

CRA 

1 

0 

— 

1 

TORB 

1 

0 

- 

0 

DDRB 

1 

1 

- 

- 

CRB 


10.3 Anwahl der Register 


Um alle Leitungen des Tores A z. B. als Ausgänge zu verwenden wird 
folgendes Programm benötigt: 


LDA #$00 
STA SC0C1 
LDA #$FF 
STA SC0C0 
LDA #$04 
STA $C0C1 
LDA #$AA 
STA SC0C0 


Daten richtu ngsregister 
DDRA anwählen 
alle Leitungen = Eins 

TORA anwählen 

Bitmuster $AA wird an 
TORA ausgegeben. 


Dabei wird angenommen, daß die Anfangsadresse des 6520 bei der 
Adresse SCOCO liegt. Das Tor B wird auf die gleiche Weise über das 
Register CRB programmiert. 


Die weitere Belegung der Bit in den Kontrollregistern zeigt Abbildung 
10.4. 
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IRQ 

AI 

IRQ 

A2 

-'- 1 - 

CA2 

DDRA 

-1--- 

CA1 


IRQ 

Bl 

IRQ 

B2 

CB2 

DDRB 

CB1 


10.4 Bitbelegung der Kontrollregister 


Bit 0 und 1 steuern die Eingänge CA1 bzw. CB1. Bit 2 ist das Aus¬ 
wahlbit für die Datenrichtungsregister. Bit 3, 4, 5 steuern die bidirek¬ 
tionalen Leitungen CA2 bzw. CB2. Bit 6 und 7 sind Interrupt-Merker. 
Sie sind normalerweise Eins. Werden Sie durch eine externe Bedingung 
auf Null gesetzt, so verursacht dies ein Nullsetzen der IRQA bzw. der 
IRQB Leitung und somit die Auslösung eines Interrupts. Die beiden 
Leitungen sind offene Kollektor-Leitungen und können somit durch 
"wired or" verbunden werden. 


CRA (CRB) 


Bit 1 

Bit 8 

aktive Flanke an CA1 (CB1 

IRQA, (IRQB) 

0 

0 

—. 1 . 

Kein Interrupt 

0 

1 

.» 

Bit 7 = 0 Interrupt 

1 

0 

. T. 

Kein Interrupt 

1 

1 

__ i ' 

Bit 7 = 0 Ihterrupt 


10.5 Interruptsteuerung CA1 (CB1) 


In Abbildung 10.5 wird gezeigt, daß z. B. ein Interrupt durch eine negative 
Flanke an CA1 ausgelöst wird, wenn Bit 0 = 1 und Bit 1 = 0 ist. Diese 
beiden Bit haben in beiden KontraIIregistern die gleiche Bedeutung. 


In Abbildung 10.6 ist die Wirkung eines Impulses auf der Leitung CA2 
gezeigt. Sind Bit 3, 4, 5 gleich Null, so löst weder eine positive noch 
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eine negative Flanke einen Interrupt aus. Auch diese 3 Bit haben in 
beiden Registern die gleiche Bedeutung. 


CRA (CRB) 


Bit 5 

Bit 4 

Bit 3 

aktive Flanke an CA2 (CB2) 

IRQA (IRQB) 

0 

0 

0 

“L 

Kein Interrupt 

0 

0 

1 

\ 

Bit 6 = 0 Interrupt 

0 

1 

0 

r~ 

Kein Interrupt 

0 

1 

1 


Bit 6 = 0 Interrupt 


10.6 Interruptsteuerung CA2 (CB2) 


Wird Bit 5 gleich Eins gesetzt, so haben die Steuerleitungen unter¬ 
schiedliches Verhalten. 

Über das Kontrollregister CRA erfolgt die Betriebsart Handshake Lesen 
an Tor A. 

Mit Bit 3, 4 = 0 und Bit 5 = 1 ist CA2 eine Ausgangsleitung. Ein Inter¬ 
rupt auf CA1 setzt die CA2 Leitung auf 1. Diese wird erst dann wieder 
Null, wenn ein LOAD von Tor A - Befehl erfolgt ist. Mit der nächsten 
Bitbelegung wird auf CA2 nach einen LOAD von Tor A - Befehl ein 
negativer Impuls für die Dauer eines Maschinenzykluses ausgegeben. Mit 
den letzten beiden Bitbelegungen kann CA2 auf Ooder 1 gesetzt werden. 

CRA 


Bit 5 

Bit 4 

Bit 3 

Betriebsart 

Beschreibung 

1 

0 

0 

Handshake 

Lesen 

CA2 = 1 wenn Interrupt an CA1, 
CA2 = 0 bei LOAD-Befehl 

1 

0 

1 

Ausgangs¬ 

impuls 

CA2 = ”1_T, nach 

LOAD-Befehl 

1 

1 

0 


CA2 = 0 

1 

1 

1 


CA2 = 1 


10.7 Betriebsart Handshake Lesen 
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Das Kontrollregister CRB bestimmt die Betriebsart Handshake schrei¬ 
ben an Tor B. 

Mit Bit 5 = 1 und Bit 3 und 4 = 0 wird CB2 bei einem STORE an 
Tor B - Befehl auf Null gesetzt. Die Rücksetzung erfolgt dann durch 
einen aktiven Interrupt an CB1. Mit der Bitbelegung 101 wird nach 
jedem STORE an das Tor B - Befehl ein negativer Impuls auf CB2 
ausgegeben. 

Die Impulsdauer beträgt wiederum einen Maschinenzyklus. Durch die 
beiden anderen Bitmuster kann CB2 auf Null oder Eins gesetzt werden. 


CRB 


Bit 5 

Bit 4 

Bit 2 

Betriebsart 

Beschreibung 

1 

0 

0 

Handshake 

Schreiben 

CB2 = 0 bei STORE-Befehl, 
CB2 = 1 bei Interrupt auf CB1 

1 

0 

1 

Ausgangs¬ 

impuls 

CB2 =UT, nach 

STORE-Befehl 

1 

1 

0 


CB2 = 0 

1 

1 

1 


CB2 = 1 


10.8 Betriebsart Handshake Schreiben 


Der 6520 eignet sich also vorzüglich zum Datentransfer zwischen 
Prozessor und peripheren Geräten. 


Beim ATA RI-Computer hat dieser Baustein die Adressen: 



HEX 

DEZ 

TORA / DDRA 

D300 

54016 

TORB/DDRB 

D301 

54017 

CRA 

D302 

54018 

CRB 

D303 

54019 
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10.2 Der Baustein VIA 6522 

Der VIA (Versatile Interface Adapter) 6522 enthält 2 bidirektionale 
Tore A und B, 2 16-bit Timer, ein Schieberegister und Steuerleitungen 
für den Handshake-Betrieb mit anderen Geräten. 

Das Blockschaltbild des 6522 gleicht dem Blockschaltbild des 6520 
(Abbildung 10.1). Der interne Aufbau des 6522 ist jedoch wesentlich 
komplizierter (Abbildung 10.9). Alle Funktionen werden über 16 
adressierbare Register angewählt. Die Adressen dieser Register und 
ihre Bezeichnungen sind in Abbildung 10.10 angegeben. 

Die Basisadresse des Bausteins hängt von dem ihm zugeordneten freien 
Speicherplatz im Rechner ab. 


INTERRUPT 

CONTROL 



10.9 Interner Aufbau des 6522 


10.21 Programmierung der Tore 

Die 16 I/O-Leitungen können wahlweise als Eingangs- oder Ausgangs¬ 
leitungen verwendet werden. Die Richtung wird über die Datenrich- 


209 

























































tungsregister DD RA und DDRB festgelegt. Wird in diesen Registern 
ein Bit = 1 gesetzt, so ist die entsprechende Leitung ein Ausgang, 
wird ein Bit = 0 gesetzt, so ist diese Leitung ein Eingang. Nach dem 
Einschalten und nach jedem RESET (BREAK) des Rechners sind alle 
Leitungen als Eingangsleitungen geschaltet. 


Adresse 

Name 

Bezeichnung 

0000 

ORB 

Ein- und Ausgangstor B 

000 1 

ORA 

Ein- und Ausgangstor A 

00 1 0 

DDRB 

Datenrichtungsregister B 

00 1 1 

DDRA 

Datenrichtungsregister A 

0 1 00 

T1L-L 

Timer 1 LO-Byte-Speicher (Schreiben) 


T1C-L 

Timerl LO-Byte-Zähler (Lesen) 

0 10 1 

T1C-H 

Timerl Hl-Byte-Zähler 

0 110 

T1L-L 

Timer 1 LO-Byte-Speicher 

1 000 

T2L-L 

Timer 2 LO-Byte-Speicher (Schreiben) 


T2C-L 

Timer 2 LO-Byte-Zähler (Lesen) 

1 00 1 

T2C-H 

Timer 2 Hl-Byte-Zähler 

10 10 

SR 

Schieberegister 

10 11 

ACR 

Steuerregister 

1 1 00 

PCR 

Peripherie Steuerregister 

110 1 

IFR 

Interrupt Flag Register 

1110 

IER 

Interrupt Enable Register 

1111 

ORA 

TOR A (kein Handshake) 


10.10 Register des 6522 


Beispiel: 

Bit 0 bis 6 von Tor A sind Ausgänge, Bit 7 ein Eingang. 

LDA #87F 
STA DDRA 


Die Festlegung der Datenrichtung braucht in einem Programm nur 
einmal gemacht werden. Sie bleibt bis zu einem RESET erhalten. 
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10.22 Programmierung der Timer 

Der Timer 1 besteht aus 2 8-bit Speichern T1L—L und T1L H und 
einem 16-bit Zähler TIC—L und TIC—H. Die Zählerzelle TIC—L hat 
beim Schreiben und Lesen unterschiedliche Funktionen. Das Schrei¬ 
ben nach TIC—L entspricht einem Schreiben nach T1L—L, sie ver¬ 
hält sich wie eine Speicherzelle, beim Lesen von TIC—L wird das 
LO-Byte des Zählers ausgegeben. Ein Schreibbefehl nach TIC—H 
startet den Zähler. Dabei wird der Inhalt von T1L—L nach TIC—L 
übernommen. Der Inhalt des Zählers wird mit dem Maschinentakt 
02 erniedrigt. Wird der Zählerstand 0 erreicht, wird je nach program¬ 
mierter Betriebsart ein Interrupt augelöst oder ein Signal an PB7 
(Port B, Bit7) ausgegeben. Dabei kann der Inhalt von T1L—L und 
T1L—H wieder in den Zähler übernommen und somit ein fortlaufen¬ 
des Signal erzeugt werden. 

Die Betriebsart wird über Bit 6 und Bit 7 des Steuerregisters ACR 
bestimmt (Abbildung 10.11). Mit ACR6=1 und ACR7=1 wird die 
Betriebsart "free running mode" eingestellt. Bei jedem Nulldurch¬ 
gang des Zählers ändert sich die Polarität des Signals an PB7. Dort 
entsteht ein Rechtecksignal mit der programmierten Zeit als halbe 
Periodendauer. 


ACR7 

ACR6 

Betriebsart 

0 

0 

Monoflop, nur Interrupt, kein Signal an PB7 

0 

1 

Fortlaufende Interrupts, kein Signal an PB7 

1 

0 

Monoflop, Interrupt, negativer Impuls an PB7 

1 

1 

Fortlaufende Interrupts, Rechtecksignal an PB7 


10.11 Festlegung der Timer Betriebsart 


Abbildung 10.12 ist ein Programm zur Erzeugung einer Taktfrequenz 
von 100.0 ms. 

Die in den Zähler eingegebene Zahl SC74E entspricht Dezimal 51023 
und nicht dem theoretischen Wert von 50000. Dies ist durch die Takt¬ 
frequenz der Rechner bedingt, die nicht genau 1 MHz ist, sondern 
meist etwas darüber liegt. 
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0800 


2 



0800 


3 



0800 


4 

.ft««***«**»««****************ft 

0800 


5 

. * 

* 

0800 


6 

;* RECHTECKGENERATOR MIT 

# 

0800 


7 

;* 100.0 MS PERIODENDAUER 

ft 

0800 


8 

. * 

ft 

0800 


9 


0800 


10 



0800 


11 



0800 


12 

ACR EQU $C0CB 


0800 


13 

T1CL EQU $C0CA 


0800 


14 

TI CH EQU $C0C5 


0800 


15 

H0NIT0 EQU $FF59 


0800 


16 

| 


0800 


17 

9 


0800 

A9C0 

18 

LDA //$C0 

; BETRIEBSART SETZEN 

0802 

8DCBC0 

19 

STA ACR 


0805 

A94E 

20 

LDA //$4E 

; L0 BYTE LADEN 

0807 

8DC4C0 

21 

STA TICL 


080A 

A9C4 

22 

LDA #$C4 

; HI BYTE LADEN 

080C 

8DC5C0 

23 

STA TI CH 

; UND TIMER STARTEN 

080F 

4C59FF 

24 

JMP M0NIT0 


0812 


25 

y 


0812 


26 

l 




27 

END 



10.12 Rechteckgenerator 


Mit dem Befehl STA TI CH wird der Timer gestartet und läuft dann 
unabhängig von der CPU. An dieses Programmteil kann nun ein völlig 
anderes Programm angeschlossen werden, ohne die Funktion des 6522 
Timers zu unterbrechen. Die Ausgabe des Rechtecks wird in einem 
Programm nur durch eine Änderung der Betriebsart in ACR beendet. 


Soll eine Frequenzänderung durchgeführt werden, so wird die neue 
Zeit in die Speicherzellen T1L—L und T1L—H geschrieben. Diese Zahl 
wird dann beim nächsten Nulldurchgang in den Zähler übernommen 
und somit die Frequenz verändert. 

Der Timer 2 kann wie der Timer 1 als Monoflop betrieben werden. 

Darüberhinaus kann er als Zähler für negative Flanken externer Geräte 
an PB6 eingesetzt werden. Seine Betriebsart wird durch Bit 5 von ACR 
bestimmt. 
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ACR5 = 0 
ACR5 = 1 


Monoflop 

Zählen negativer Flanken an PB6. 



Verbindet man PB7 und PB6 durch eine Drahtbrücke, so erhält man 
so eine Stoppuhr zur Messung von Programmlaufzeiten oder einen 
Taktgeber für Prozess-Steuerungen. 


10.23 Programmierung des Schieberegisters 

Das Register SR ist ein Schieberegister, das entweder parallele Daten 
von Prozessor seriell an externe Geräte ausgeben oder serielle Daten 
von externen Geräten aufnehmen kann. Dazu kann ein externer Takt, 
ein Takt von Timer 2 oder der Maschinentakt verwendet werden. Die 
Betriebsart wird durch die BIT 4, 3, 2 vom Steuerregister ACR fest¬ 
gelegt. Ihre Bedeutung zeigt Abbildung 10.13. 


ACR4 

ACR3 

ACR2 


0 

0 

0 

Schieberegister abeschaltet 

0 

0 

1 

Einlesen mit Takt von Timer 2 

0 

1 

0 

Einlesen mit O 2 Takt 

0 

1 

1 

Einlesen mit externen Takt 

1 

0 

0 

Auslesen "'free running mode" mit Takt von Timer 2 

1 

0 

1 

Auslesen mit Takt von Timer 2 

1 

1 

0 

Auslesen mit O 2 Takt 

1 

1 

1 

Auslesen mit externen Takt 


10.13 Festlegung der SR Betriebsart 


Der Inhalt des Schieberegisters wird über die Steuerleitung CB2 ein- 
oder ausgegeben. Erfolgt dies unter Verwendung eines externen Taktes, 
so wird dieser über CB1 eingegeben. Der interne Takt wird ebenfalls 
zur Synchronisierung externer Geräte über CB1 ausgegeben. 


Wird der Takt vom TIMER2 vorgegeben, so ist er in Verbindung mit 
dem Schieberegister nur ein 8-bit Zähler, so daß die langsamste Schiebe¬ 
frequenz ca. 0.5 ms beträgt, da das Ein- oder Auslesen des Schiebe¬ 
registers bei jedem 2. Nulldurchgang des Zählers stattfindet. 
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Beispiel: 

Freilaufender Rechteckgenerator mit änderbaren Tastverhältnis (Ab¬ 
bildung 10.14). 


0800 


2 





0800 


3 





0800 


4 





0800 


5 


* 



0800 


6 


t 

RECHTECKGENERATOR MIT 


0800 


7 


ft 

AENDERBAREM TASTVERHAELT- 


0800 


8 


ft 

NISS 


0800 


9 


ft 


« 

0800 


10 





0800 


11 





0800 


12 





0800 


13 

ACR 

EQU $C0CB 


0800 


14 

T2LL EQU $C0C8 


0800 


15 

SR 

EQU $C0CA 


0800 


16 

M0NIT0 EQU $FF59 


0800 


17 

| 

1 



0800 

A9FF 

18 



LDA #$FF ; 

TIMER 2 AUF LANGSAMSTE 

0802 

8DC8C0 

19 



STA T2LL ; 

FREQUENZ STELLEN 

0805 

A910 

20 



LDA #$10 ; 

BETRIEBSART WAEHLEN 

0807 

8DCBC0 

21 



STA ACR 


080A 

A90F 

22 



LDA #$0F ; 

4 X DIE 0 UND 4 X DIE 

080C 

8DCAC0 

23 



STA SR ; 

AUSGEBEN 

080F 

4C59FF 

24 



JMP M0NIT0 


0812 

25 

j 

} 



0812 


26 

3 

1 





27 



END 







10.14 Rechteck 2 



Durch Ändern der Bitbelegung des Schieberegisters SR lässt sich das 
Tastverhältnis, durch Ändern von T2L—L lässt sich die Frequenz des 
Rechteckgenerators verändern. 

Mit den beiden verbleibenden Bit des Steuerregisters ACR lassen sich 
Bitmuster an Tor A und Tor B speichern, wenn diese als Eingänge 
geschaltet sind. 

Ist Bit 0 vom ACR gleich Null, so wird bei einem LDA TORA das 
augenblickliche Bitmuster von Tor A in den Rechner übernommen. 


Wird Bit 0 auf Eins gesetzt, so wird das anliegende Bitmuster solange 
gespeichert, bis ein LDA TORA erfolgt. Änderungen des Bitmusters 
an den Eingängen hat keinen Einfluß auf das gespeicherte Bitmuster. 
Das Einschreiben des Bitmusters erfolgt mit dem Setzen des CA1 
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Interruptmerkers im IFR Register (siehe 10.16). Die Beduetung der 
einzelnen Bit des Steuerregisters ACR zeigt Abbildung 10.15. 


BIT 

7 

6 

5 

4 

3 

2 

1 

0 

ACR 

TIMER1 

TIM— 

SCHIEBEREG. 

TORA 

TORB 




ER2 




SPEICHERN 


B 10.15 Bitbelegung ACR 


Eine Überwachung der Timer und des Schieberegister findet im IFR 
(Interrupt Flag Register) statt. Die Bitbelegung zeigt Abbildung 10.16. 


7 

6 

5 

4 

3 

2 

1 

0 

IRQ 

TI 

T2 

CB1 

CB2 

SR 

CA1 

CA2 


10.16 Bitbelegung IFR 


Bei einer Schreib- oder Leseoperation mit dem Register SR wird Bit 2 
von IFR gesetzt, und nach 8 Schiebetakten zurückgesetzt. Vom Pro¬ 
gramm aus muß also die Zahl der Schiebebefehle nicht mitgezählt 
werden. 

Auf die gleiche Weise können die beiden Timer überwacht werden. Für 
sie sind Bit 5 (Timer 2) und Bit 6 (Timer 1) zuständig. Sie werden beim 
Starten des Zählers (Schiebebefehl nach TIC—H, bzw. T2C—H) gesetzt 
und beim Nulldurchgang des Zählers wieder zurück gesetzt. Dies wird 
im Programm MONOFLOP (Abbildung 10.17) benutzt. Beim Abfragen 
der Bit ist zu beachten, daß diese "Active low" sind, daß das gesetzte 
Bit gleich Null ist. 


10.24 Datenübertragung mit externen Geräten 

Die Bit 0, 1, 3 und 4 des IFR werden zur Steuerung der Datenüber¬ 
tragung mit externen Geräten benötigt. Das Setzen und Rücksetzen 
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dieser Bit erfolgt durch Programmierung des PCR (Peripheral Control 
Register). Die Bitbelegung zeigt Abbildung 10.18. 


0800 


2 





0800 


3 





0800 


4 


*#*#*##***##*######****##*### 

0800 


5 


* 


* 

0800 


6 


* 

MONOFLOP 

* 

0800 


7 


* 


* 

0800 


8 


***************************** 

0800 


9 





0800 


10 





0800 


11 

ACR 

EQU $C0CB 


0800 


12 

TI CL 

EQU $C0C4 


0800 


13 

TI CH 

EQU $C0C5 


0800 


14 

IFR 

EQU $C0CD 


0800 


15 


) 



0800 

A980 

16 

MOMOFL 

, LDA //$80 

; BETRIEBSART MONOFLOP 

080? 

8DCBC0 

17 



STA ACR 

; SETZEN 

0805 

A950 

18 



LDA //$50 


0807 

8DC4C0 

19 



STA TICL 

; ZEIT SETZEN 

080A 

A9C7 

20 



LDA // $C 7 


080C 

8DC5C0 

21 



STA TI CH 

; IFR6=0 TIMER STARTEN 

080F 

ADCDC0 

22 

M 

LDA IFR 


0812 

2940 

23 



AND A$40 

; IFR6 AUSBLENDEN 

0814 

F0F9 

24 



BEQ M 


0816 

60 

25 



RTS 

; FUF.CKKEHR MIT IFR6 = 1 

0817- 


26 





0817 


27 


) 





28 



END 



10.17 Monoflop 


BIT 

PCR 


7 

6 

5 

4 

3 

2 

1 

0 

CB2 

CB1 

CA2 

CA1 


10.18 Bitbelegung PCR 


Bit 0 von PCR bestimmt, mit welcher Flanke an der Eingangsleitung 
CA1 das Bit 1 in IFR gesetzt wird. Ist PCRO = 0 so wird CA1 durch 
eine negative Flanke, mit PCRO = 1 durch eine positive Flanke gesetzt. 
Die Rücksetzung erfolgt durch eine Schreib- oder Leseoperation auf Tor 
A. Auf die gleiche Weise kann über PCR4 das Setzen des Bits IFR4 
programmiert werden. Das Rücksetzen erfolgt durch eine Schreib- oder 
Leseoperation mit Tor B. 

Für das Setzen oder Rücksetzen von CA2 bzw. CB2 bestehen insgesamt 
8 Möglichkeiten. Diese sind in Abbildung 10.19 zusammgestellt. 
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PCR3 

PCR2 

PCR1 


0 

0 

0 

IFRO wird durch eine negative Flanke 
an CA2 gesetzt, Rücksetzen durch 
Lesen oder Schreiben von TORA 

0 

0 

1 

Interrupt - Betrieb. Negative Flanke 
setzt IFRO, kein Rücksetzen durch 
Lesen oder Schreiben von TORA 

0 

1 

0 

IFRO wird durch eine positive Flanke 
gesetzt, Rücksetzen durch Lesen oder 
Schreiben von TORA 

0 

1 

1 

Interrupt - Betreib. Positive Flanke 
setzt IFRO, kein Rücksetzen durch 
Lesen oder Schreiben von TORA 

1 

0 

0 

Handshake - Betrieb. CA2 Ausgang 
wird nach Schreiben oder Lesen von 
TORA auf 0 gesetzt. Rücksetzen 
durch Impuls an CA1 

1 

0 

1 

Impuls - Betrieb. Nach Lesen oder 
Schreiben von TORA wird CA2 
einen Takt lang 0 

1 

1 

0 

Setzt CA2 auf 0 

1 

1 

1 

Setzt CA2 auf 1 


10.19 Programmierung von CA2, CB2 


Mit den Bit PCR3, 2, 1 wird CA2, mit den Bit PCR7, 6, 5 wird CB2 
programmiert. 


10.25 Interrupt-Verarbeitung 

Dem IFR-Register ist ein zweites Register, das IER (Interrupt Enable 
Register) zugeordnet. 

Den Bit 0 bis 6 des IFR entsprechen die Bit 0 bis 6 des IER. Ist das 
entsprechende Bit des IER gleich 1, so wird der Interrupt an den 
Prozessor weitergeleitet. Bit 7 des Bitmusters, das in das IER zu schrei¬ 
ben ist, bestimmt, ob die Interrupt-Enable-Bits gesetzt oder gelöscht 
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werden sollen. Ist Bit 7 gleich 1, so werden alle Bit 0 bis 6 gesetzt, die 
im Bitmuster eine 1 enthalten, eine 0 im Bitmuster ändert das ent¬ 
sprechende Interrupt-Enable-Bit nicht. 

Beispiel: Interrupt von Timer 1 zulassen 

LDA #% 10100000 

STA IFR ; Interrupt löschen 

STA IER ; Interrupt einschalten 

Soll im IER ein Bit gelöscht werden, und damit eine Programmunter¬ 
brechung von diesem Teil des 6522 nicht mehr zugelassen werden, so 
ist Bit 7 des Bitmusters 0. Alle Bit 0 bis 6, die im Bitmuster 1 sind, 
löschen das entsprechende Interrupt-Enable-Bit. Eine Null im Bitmuster 
lässt dieses ungeändert. 

Beispiel: Interrupt von Timer 1 abschalten 

LDA #% 00100000 

STA IFR ; Interrupt löschen 

STA IER ; Interrupt abschalten 


Da für die 6 Möglichkeiten eines Interrupts nur eine IRQ Leitung zum 
Prozessor zur Verfüngung steht, muß durch Ausblenden des IFR- 
Registers in dem Interrupt Service Programm festgestellt werden, 
welchen Teil des 6522 den Interrupt ausgelöst hat. 

Der 6502 Prozessor erkennt zwei verschiedene Interrupts. Den NMI 
(Non Maskable Interrupt) und den IRQ (Interrupt Request). 

Der Unterschied zwischen beiden besteht darin, daß der NMI nicht ab¬ 
geschaltet werden kann, während der IRQ durch Setzen oder Löschen 
des Interrupt Bits im Statusregister zugelassen oder nicht zugelassen 
wird. Durch SEI wird ein Interrupt über IRQ abgeschaltet, durch CLI 
wird er zugelassen. 


Wird eine dieser beiden Leitungen physikalisch auf Null gesetzt, so wird 
das laufende Programm nach Beendigung des gerade auszuführenden 
Befehls unterbrochen und ein indirekter Sprung über eine festgelegte 
Speicherzelle ausgeführt. 
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Für den NMI sind dies die Zellen 8FFFA und SFFFB und für den IRQ 
die Zellen SFFFE und SFFFF. Da diese Zellen ROM-Zellen sind, und 
somit nicht durch Programm geändert werden können, muß man die 
weitere Behandlung des Interrupts über die in diesen Zellen program¬ 
mierten Adressen verfolgen. 

Beim APPLE II ist für den NMI die Adresse S3BFB programmiert. 
Dort findet man: 

S03FB — 4C 65 FF 

Dies ist ein Rücksprung in den Monitor. In diese beiden RAM-Zellen 
kann nun ein Sprung in ein eigenes Interruptbehandlungs-Programm 
programmiert werden. 


Für den IRQ findet man beim APPLE II die Adressen SFA40 (Auto¬ 
start ROM). Dort beginnt eine Interrupt-Servie Routine (Abbildung 
10.20). Bei einem Interrupt wird neben dem augenblicklichen Stand 
des Befehlszählers auch noch der Prozessorstatus im Stapel abgelegt 
(Abbildung 10.21). 


FA40- 

85 

45 


STA 

$45 

AKKUMULATOR RETTEN 

FA42- 

68 



PLA 


INHALT VOM STAPEL HOLEN 

FA43- 

48 



PHA 


UND WIEDER ZURÜCKSCHREIBEN 

FA44- 

0A 



ASL 



FA45- 

0A 



ASL 



FA46- 

0A 



ASL 


3 MAL LINKS SCHIEBEN 

FA47- 

30 

03 


BMI 

$FA4C 

WENN NEGATIV, DANN WAR ES BRK 

FA49- 

6C 

FE 

03 

JMP 

($03FE) 

SONST ZUR INTERRUPT-SERVICE-ROUTINE 

FA4C- 

28 



PLP 


BEGINN BRK—PROGRAMM 

FA4D- 

20 

4C 

FF 

JSR 

$FF4C 


FA50- 

68 



PLA 



FA51- 

85 

3A 


STA 

$3A 


FA53- 

68 



PLA 




10.20 IRQ-Routine Apple II 


In der Interrupt-Service-Routine wird zuerst der Akkumulator gerettet 
und dann der Prozessorstatus in den Akkumulator geholt. Durch 
gleichzeitiges Zurückschreiben wird der Stapelzeiger nicht verändert. 
Wenn dieser Interrupt durch einen BRK-Befehl (Software-Interrupt) 
ausgelöst wurde, ist im Statusregister das BRK-Bit gesetzt. Dies wird 
durch 3 maliges Linksschieben des Akkumulatorinhaltes festgestellt. 
War es ein BRK-Befehl, so wird mit BMI in den BRK-Programmteil 
verzweigt. Wenn nicht, folgt ein indirekter Sprung über die Speicher- 
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zellen S3FE, S3FF zurück in den Monitor. In diesen beiden Zellen 
kann der Benutzer den Beginn einer eigenen IRQ Service Routine 
programmieren. 



S1C4 

S1C3 

S1C2 

S 



ADRL 


ADRH 


STATUS 








S1C4 

S1C3 

$1C2 

S1C1 


10.21 Stapelbelegung bei einem Interrupt 


Die Rückkehr in das ursprüngliche Programm erfolgt mit RTI (Return 
from Interrupt). Dabei wird der Prozessorstatus zurückgeschrieben und 
die Adresse des nächsten Befehls vom Stapel in den Programmzähler 
übernommen. 


10.26 Druckersteuerung mit einem 6522 

Ein Drucker mit einer 8-bit Parallel-Schnittstelle soll über einen 6522 
an ein 6502 System angeschlossen werden. 

Die ASCII-Zeichen werden über das Tor A an den Drucker übergeben. 
Die beiden Steuersignale STR und ACK werden über das Tor B aus¬ 
gegeben bzw. aufgenommen. 

Der Druckbeginn wird durch einen positiven Impuls STR eingeleitet. 
Als Leitung zu m Dr ucker wird dafür PBO verwendet. Dieser antwortet 
auf STR mit ACK. Dieses Signal ist solange Null, bis der Drucker 
bereit ist, ein neues Zeichen zu übernehmen. Mit PB7 wird diese 
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Leitung überwacht. Damit erhält man folgendes Programm (Abbildung 

10 . 22 ). 


0800 

0800 


0800 


4 




0800 


5 



« 

0800 


6 

;« ANSTEUERUNG EINES 

DRUCKERS* 

0800 


7 

• ft 


ff 

0800 


8 




0800 


9 




0800 


10 




0800 


11 

TORA 

EQU $C091 


0800 


12 

TORB 

EQU $C090 


0800 


13 

DDRA 

EQU $C093 


0800 


14 

DDRB 

EQU $C092 


0800 


15 

» 



0800 


16 

GETCH 

EQU $FD00 


0800 


17 

* 



0800 

A9FF 

18 

PRINT 

LDA #$FF 


0802 

8D93C0 

19 


STA DDRA 


0805 

A903 

20 


LDA #$03 


0807 

8D92C0 

21 


STA DDRB 


080A 

A902 

22 


LDA #$02 

; 2 —> TORB 

080C 

8D90C0 

23 


STA TORB 


080F 

2000FD 

24 


JSR GETCH 


0812 

8D91CO 

25 


STA TORA 

; ASCII —> DRUCKER 

0815 

4E90C0 

26 


LSR TORB 

9 

0818 

0E90C0 

27 


ASL TORB 

; STR —> DRUCKER 

081B 

AD90C0 

28 

P 

LDA TORB 

; WARTEN AUF ACK 

081E 

10FB 

29 


BPL P 


0820 

30DE 

30 


BMI PRINT 

; NEUES ZEICHEN 

0822 


31 

9 



0822 


32 

9 




33 


END 


10.22 Druckeransteuerung 
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vss 

d 

1 


40 

Z> 

CA1 

PAO 

er 

2 


39 

Z) 

CA2 

PA1 

cz 

3 


38 

ZI 

RSO 

PA2 

cz 

4 


37 

Z3 

RS1 

PA3 

cz 

5 


36 

Z3 

RS2 

PA4 

cz 

6 


35 

Z) 

RS3 

PA5 

cz 

7 


34 

Z) 

RES 

PA6 

cz 

8 

03 

(71 

33 

z 

OO 

PA7 

cz 

9 

32 

Z3 

Ol 

PBO 

cz 

10 

ro 

31 

ZI 

02 

PB1 

cz 

11 

rs) 

30 

=3 

03 

PB2 

q= 

12 

< 

29 

Z3 

04 

PB3 

IZ 

13 

>S 

28 

=3 

05 

PB4 

cz 

14 


27 

Z 

06 

PB5 

cz 

15 


26 

Z3 

07 

PB6 

cz 

16 


25 

Z3 

02 

PB7 

C 

17 


24 

=3 

CS1 

CB1 

cz 

18 


23 

Z3 

CS 2 

CB2 

cz 

19 


22 

Z3 

R/W 

veetz 

20 


21 

Z3 

IRQ 


Pinbelegung 6522 


VSS 

CI 

1 


40 

PAO 

CZ 

2 


39 

PA 1 

cz 

3 


38 

PA2 

CZ 

4 


37 

PA3 

CZ 

5 


36 

PA4 

c= 

6 


35 

PA5 

cz 

7 


34 

PA6 

cz 

8 

w# 

CJ1 

33 

PA7 

cz 

9 

IS) 

32 

PBO 

IZ 

10 

o 

31 

PB 1 

cz 

11 


30 

PB2 

IZ 

12 


29 

PB3 

cz 

13 

> 

28 

P84 

cz 

14 


27 

PB5 

cz 

15 


26 

PB6 

cz 

16 


25 

PB7 

IZ 

17 


24 

CB1 

cz 

18 


23 

CB2 

cz 

19 


22 

VCCCZ 

20 


21 


CA2 
IRQÄ 
Z2 IRQB 
RSO 
RS. 

Res 
oo 
=3 Dl 
] D2 
) D3 
3 04 
3 D5 
3 D6 

ZU 07 

Z3ENABLE 
Z1CS1 
ZU CS 2 
CSO 
ZI R/W 


Pinbelegung 6520 
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Fehlersuche in 
Programmen 


11. Fehlersuche in Programmen 

In den wenigsten Fällen wird ein Programm sofort fehlerfrei laufen. 
Wenn dies der Fall ist, so sollte man trotzdem skeptisch sein, denn nicht 
alle Schleifen werden immer sofort durchlaufen. Auf der anderen Seite 
sollte man unerklärliche Fehler nicht auf Hardware-Fehler zurück¬ 
führen. 

In 99,9 Prozent der Fälle ist dies nicht der Fall . Die Fehlersuche sollte 
schon beim Programmieren berücksichtigt werden. Kleinere Programm¬ 
blöcke und kurze Unterprogramme sind leicht zu testen. Dazu lohnt es 
sich oft, ein kleines Programm zu schreiben, das wie das spätere fertige 
Programm, die Daten an das zu prüfende Programm übergibt. Das ge¬ 
wünschte Ergebnis wird durch Anzeigen bestimmter Zelleninhalte 
überprüft. 

In den meisten Fällen wird sich aber folgendes ereignen. Man startet 
das Programm, und nichts passiert. Es erscheint kein erwarteter Bild¬ 
schirmausdruck, keine Signale werden ausgelöst, denn das Programm ist 
"versoffen", und kann nur durch RESET angehalten werden. Was ist 
nun zu tun. Als erstes sollte das Programm ausgedruckt werden und mit 
den vorhergemachten Aufzeichnungen verglichen werden. Denn einer 
der häufigsten Fehler ist, beim Schreiben eines Programms, das Ver¬ 
gessen einer Assemblerzeile. 

Wenn dabei nichts entdeckt wird, muß man durch Programmänder¬ 
ungen versuchen den Fehler einzukreisen. Dabei gilt ein eiserner Grund¬ 
satz: 

Für jeden Testlauf nur eine einzige Änderung einführen. 
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Diese Änderung muß auch im Programmausdruck vermerkt werden. Für 
diese Programmänderung verwendet man am besten den BRK-Befehl. 
Jeder anständige Monitor hat eine BREAK-Routine, bei welcher der 
Inhalt des Akkumulators, des Indexregister, des Stapelzeigers und des 
Statusregisters auf den Bildschirm ausgegeben wird. 

Eine unendliche Schleife lässt sich dann auf folgende Weise finden. Man 
ändert den ersten Befehl nach einem JSR in einen BRK Befehl um und 
stellt so fest, ob das Unterprogramm verlassen wird. Ist dies der Fall, 
wird die Änderung rückgängig gemacht und ein BRK nach dem 
nächsten Unterprogrammsprung eingeführt. Wird das Unterprogramm 
nicht velassen, so muß der Fehler auf die gleiche Weise dort gesucht 
werden. 

Beliebte Fehler, die zu unendlichen Schleifen führen können sind 
folgende zwei Beispiele: 

MO LDX #S00 

LDA PLATZ,X 
INX 

CPX #$C0 
BNE MO 

und INC ADRL 

CMP #SA0 
BNE WOHIN 

Der Leser kann sich überlegen, was an diesen Beispielen falsch ist. 
Einzelne Monitore verfügen über TRACE-Programme. Damit kann ein 
Programmteil in einzelnen Schritten ausgeführt werden. Nach jedem 
Schritt wird der Inhalt der Register angezeigt. 

Bei der Papier- und Bleistiftmethode ist der häufigste Fehler ein falsch 
berechneter Sprung. Diesem kann man durch dieses Einzelschitt- 
verfahren oder durch Disassemblierung auf die Spur kommen. 

Ist der Fehler erkannt, so kann er beseitigt werden. Dies ist bei 
Assemblern mit Texteditoren einfach. Die neuen Zeilen werden einge¬ 
fügt oder geändert und das ganze neu übersetzt. Bei Miniassemblern ist 
es oft einfacher, einen falschen Befehl herauszunehmen und durch 
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einen Sprung an das Ende des Programms zu ersetzen. Dort wird die 
richtige Befehlsfolge abgearbeitet und dann an die weiterführende Stelle 
zurückgesprungen. Das ergibt zwar keine übersichtlichen Programme, 
aber es ist oft der einzige Ausweg um einen Fehler zu beseitigen. Es 
ist deshalb vorteilhaft, beim Arbeiten mit Miniassemblern, nach einigen 
Programmzeilen durch Einfügen von mehreren NOP (mindestens 3) 
Luft für Änderungen zu lassen. 


Beim Fehlersuchen mit dem BRK-Befehl ist noch folgendes zu be¬ 
achten. Der BRK ist ein Software-Interrupt. Der Programmzähler zeigt 
danach auf das 2. Byte nach dem BRK. Kann das Programm durch 
einen Monitor-Befehl weiter ausgeführt werden, so ist ein BRK gefolgt 
von 2 NOP's einzufügen. 

Eine weitere Möglichkeit, einen Programmablauf zu verfolgen, ist die 
Ausgabe von Zeichen im Programmablauf. An bestimmten Stellen im 
Programm wird ein 

LDA ZEICHEN 
JSR OUTCHR 


eingefügt. 

Damit kann man am Bildschirm verfolgen, welche Programmteile durch¬ 
laufen werden, oder welche nicht durchlaufen werden. Der Zeitaufwand 
für die Fehlersuche übertrifft oft bei weitem die Zeit, die man benötigt 
hat, um ein Programm zu schreiben. Ist der Fehler nicht zu finden, ist 
die Neuprogrammierung der schnellste Weg. Im übrigen gilt der Spruch: 

“Der Computer hat immer recht." 
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Anhang 


Anhang 

Im folgenden Anhang sind nochmals alle Befehle in ihrer Assembler- 
Schreibweise, als Hexcode und mit der benötigten Byte-Zahl ange¬ 
geben. Dazu kommt noch die Befehlsausführungszeit mit der Angabe 
der benötigten Maschinenzyklen. 
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ADC 

A+M+C -> A 




OP 

NB 

NC 

ADC 

=H= 

> 

> 

69 

2 

2 

ADC 

siooo 

6D 

3 

4 

ADC 

S1000,X 

7D 

3 

4 

ADC 

$1000,Y 

79 

3 

4 

ADC 

S10 

65 

2 

3 

ADC 

S10,X 

75 

2 

4 

ADC 

($10,X) 

61 

2 

6 

ADC 

($10),Y 

71 

2 

5 


AND 



OP 

NB 

NC 

AND #SAA 

29 

2 

2 

AND S1000 

2D 

3 

4 

AND S1000,X 

3D 

3 

4 

AND S1000,Y 

39 

3 

4 

AND S10 

25 

2 

3 

AND S10,X 

35 

2 

4 

AND (S10,X) 

21 

2 

6 

AND (S10),Y 

31 

2 

5 
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Siehe Bild 3.2 



OP 

NB 

NC 

ASL $1000 

OE 

3 

6 

ASL $100,X 

IE 

3 

7 

ASL $10 

06 

2 

5 

ASL $10,X 

16 

2 

6 

ASL 

OA 

1 

2 


BCC 

BRANCH ON C=0 



OP 

NB 

NC 

BCC 32F 

90 

2 

2 


BCS 

BRANCH ON C=1 



OP 

NB 

NC 

BCS $2F 

BO 

2 

2 
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BEQ 

BRANCH ON Z=1 



OP 

NB 

NC 

BEQ $2F 

FO 

2 

2 


BIT 

aam 



OP 

NB 

NC 

BIT $1000 

2C 

3 

4 

BIT $10 

24 

2 

3 



BRANCH ON N=1 



OP 

NB 

NC 

BMI $2F 

30 

2 

2 
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BRANCH ON Z=0 



OP 

NB 

NC 

BNE S2F 

DO 

2 

2 



BRANCH ON N=0 



OP 

NB 

NC 

BPL S2F 

10 

2 

2 



BREAK 



OP 

NB 

NC 

BRK 

00 

1 

7 
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BVC 

B RANCH ON V=0 



OP 

NB 

NC 

BVC S2F 

50 

2 

2 


BVS 

BRANCH ON V=1 



OP 

NB 

NC 

BVS S2F 

70 

2 

2 


CLC 


c=o 



OP 

NB 

NC 

CLC 

18 

1 

2 
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D=0 




OP 

NB 

NC 

CLD 

D8 

1 

2 


CU 


1=0 



OP 

NB 

NC 

CLI 

58 

1 

2 


CLV 


v=o 



OP 

NB 

NC 

CLV 

B8 

1 

2 
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A-M 



OP 

NB 

NC 

CMP #$AA 

C9 

2 

2 

CMP S1000 

CD 

3 

4 

CMP S1000,X 

DD 

3 

4 

CMP $1000,Y 

D9 

3 

4 

CMP $10 

C5 

2 

3 

CMP ($10,X) 

CI 

2 

6 

CMP ($10),Y 

Dl 

2 

5 


CPX 


X-M 



OP 

NB 

NC 

CPX #SAA 

E0 

2 

2 

CPX $1000 

EC 

3 

4 

CPX $10 

E4 

2 

3 


CPY 


Y-M 



OP 

NB 

NC 

CPY #$AA 

CO 

2 

2 

CPY $1000 

CC 

3 

4 

CPY $10 

C4 

3 

4 
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DEC 

M—1 -*■ M 



OP 

NB 

NC 

DEC $1000 

CE 

3 

6 

DEC $1000,X 

DE 

3 

7 

DEC $10 

C6 

2 

5 

DEC $10,X 

D6 

2 

6 


DEX 

x-i 



OP 

NB 

NC 

DEX 

CA 

1 

2 


DEY 

Y—1 -*■ Y 



OP 

NB 

NC 

DEY 

88 

1 

2 
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EOR 


AVM->A 




OP 

NB 

NC 

EOR 

$ 

> 

> 

49 

2 

2 

EOR 

$1000 

4D 

3 

4 

EOR 

$1000,X 

5D 

3 

4 

EOR 

$1000,Y 

59 

3 

4 

EOR 

S10 

45 

2 

3 

EOR 

$10,X 

55 

2 

4 

EOR 

($10,X) 

41 

2 

6 

EOR 

($10),Y 

51 

2 

5 


INC 

M+1 -»-M 



OP 

NB 

NC 

INC $1000 

EE 

3 

6 

INC $1000,X 

FE 

3 

7 

INC $10 

E6 

2 

5 

INC $10,X 

F6 

2 

6 
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INX 


x+i -*■ x 



OP 

NB 

NC 

INX 

E8 

1 

2 



Y+1 -*■ Y 



OP 

NB 

NC 

INY 

C8 

1 

2 


JMP 


OP 

NB 

NC 

4C 

3 

3 

6C 

3 

5 


JMP S1000 
JMP (81000) 
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OP 

NB 

NC 

JSR 31000 

20 

3 

6 


LDA 



OP 

NB 

NC 

LDA #$AA 

A9 

2 

2 

LDA S1000 

AD 

3 

4 

LDA S1000,X 

BD 

3 

4 

LDA S1000,Y 

B9 

3 

4 

LDA S10 

A5 

2 

3 

LDA S10,X 

B5 

2 

4 

LDA (S10,X) 

AI 

2 

6 

LDA ($10),Y 

Bl 

2 

5 


LDX 



OP 

NB 

NC 

LDX #SAA 

A2 

2 

2 

LDX S1000 

AE 

3 

4 

LDX S1000,Y 

BE 

3 

4 

LDX S10 

A6 

2 

3 

LDX S10,Y 

B6 

2 

4 
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M -»• Y 




OP 

NB 

NC 

LDY #SAA 

AO 

2 

2 

LDY SIOOO 

AC 

3 

4 

LDY S1000,X 

BC 

3 

4 

LDY S10 

A4 

2 

3 

LDY S10,X 

B4 

2 

4 


LSR 

Siehe Bild 3.3 



OP 

NB 

NC 

LSR S1000 

4E 

3 

6 

LSR S1000,X 

5E 

3 

7 

LSR S10 

46 

2 

5 

LSR S10,X 

56 

2 

6 

LSR 

4A 

1 

2 


NOP 

NO OPER 



OP 

NB 

NC 

NOP 

EA 

1 

2 
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ORA 

AVM->A 



OP 

NB 

NC 

ORA #SAA 

09 

2 

2 

ORA S1000 

OD 

3 

4 

ORA S1000,X 

ID 

3 

4 

ORA 81000,Y 

19 

3 

4 

ORA 810 

05 

2 

3 

ORA S10,X 

15 

2 

4 

ORA ($10,X) 

01 

2 

6 

ORA (S10),Y 

11 

2 

5 


PHA 

A -*■ Ms, S-1 

PHA 

PHP 

P -»> Ms, S-1 -*■ S 



OP 

NB 

NC 

PHP 

08 

1 

3 


OP 

NB 

NC 

48 

1 

3 
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S+1 ->■ S, Ms-* A 



OP 

NB 

NC 

PLA 

68 

1 

4 


PLP 

S+1 -► S, Ms “► P 



OP 

NB 

NC 

PLP 

28 

1 

4 


ROL 

Siehe Bild 3.4 



OP 

NB 

NC 

ROL $1000 

2E 

3 

6 

ROL $1000,X 

3E 

3 

7 

ROL $10 

26 

2 

5 

ROL $10,X 

36 

2 

6 

ROL 

2A 

1 

2 
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Siehe Bild 3.5 


ROR $1000 
ROR $1000,X 
ROR $10 
ROR $10,X 
ROR 


OP 

NB 

NC 

6E 

3 

6 

7E 

3 

7 

66 

2 

5 

76 

2 

6 

6A 

1 

2 



RETURN F. INT 



OP 

NB 

NC 

RTI 

40 

1 

6 



RETURN F.SUB 



OP 

NB 

NC 

RTS 

60 

1 

6 
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A—M—C-* A 



OP 

NB 

NC 

SBC #SAA 

E9 

2 

2 

SBC S1000 

ED 

3 

4 

SBC $1000,X 

FD 

3 

4 

SBC S1000,Y 

F9 

3 

4 

SBC $10 

E5 

2 

3 

SBC S10,X 

F5 

2 

4 

SBC ($10,X) 

El 

2 

6 

SBC ($10),Y 

Fl 

2 

5 


SEC 



OP 

NB 

NC 

SEC 

38 

1 

2 


SED 


D=1 



OP 

NB 

NC 

SED 

F8 

1 

2 
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OP 

NB 

NC 

SEI 

78 

1 

2- 


STA 

A ->• M 




OP 

NB 

NC 

STA 

S1000 

8D 

3 

4 

STA 

S1000,X 

9D 

3 

5 

STA 

S1000,Y 

99 

3 

5 

STA 

S10 

85 

2 

3 

STA 

S10,X 

95 

2 

4 

STA 

(S10,X) 

81 

2 

6 

STA 

($10),Y 

91 

2 

6 


STX 

X^M 



OP 

NB 

NC 

STX S1000 

8E 

3 

4 

STX S10 

86 

2 

3 

STX S10,Y 

96 

2 

4 
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Y -► M 



OP 

NB 

NC 

STY $1000 

8C 

3 

4 

STY $10 

84 

2 

3 

STY $10,X 

94 

2 

4 


TAX 

A -> X 



OP 

NB 

NC 

TAX 

AA 

1 

2 


TAY 

A ->• Y 



OP 

NB 

NC 

TAY 

A8 

1 

2 
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TSX 

s^x 



OP 

NB 

NC 

TSX 

BA 

1 

2 


TXA 


X -> A 



OP 

NB 

NC 

TXA 

8A 

1 

2 


TXS 

x-+s 



OP 

NB 

NC 

TXS 

9A 

1 

2 


TYA 

Y-> A 



OP 

NB 

NC 

TYA 

98 

1 

2 
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Einige Tabellen, die im Text verstreut sind, werden zur besseren Über¬ 
sicht noch einmal aufgeführt: 


1. Tabelle der Operationscode 

2. Tabelle für Rückwandlung des Operationscodes 

3. Tabelle für Vorwätrsverzweigungen 

4. Tabelle für Rückwärtsverzweigungen 

5. Tabelle für Vergleichsoperationen 

6. Tabelle der Hexadezimalzahlen 

7. Tabelle für HEX DEZ Umwandlung 


(Abbildung 4.7) 
(Abbildung 4.8) 
(Abbildung 4.5) 
(Abbildung 4.6) 
(Abbildung 3.1) 
(Abbildung 5.7) 
(Abbildung 1.6) 
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